Příspěvky uživatele


< návrat zpět

Strana:  1 ... « předchozí  10 11 12 13 14 15 16 17 18   další » ... 44

Hezký Printscreen. 1

Zase máš pravdu elninoslov, zkoušel jsem to na MS Office 2016 a nejde to. Tak raději ještě maticově pro starší verze.

Může být?

Nevím jestli je to dobře, tak to zkontrolujte.

Co třeba použít

ZNAK(10)

Range("A2").Formula = "=IF(OR(D2="""",ISBLANK(E2)),"""",D2*E2)"

Přenos by fungoval, jen mě zatím nenapadá jak to číslovat.

Pořád to nejde stáhnout.

Příloha?

Jestli to máte formátovanou tabulku, tak je to standard.

Tak mi to pošlete na mail.

Musíte se zaregistrovat a pokud je příloha s makrem tak ji vložit v ZIP nebo RAR.

Něco jsem vyplodil, ale jelikož nemáte přílohu, tak si to musíte napasovat na Váš soubor sama.

Našel jsem makro, které by mohlo vyřešit problém.

Sub nahradit()

Dim OriginalText As String
Dim CorrectedText As String
Dim wsDATA As Worksheet
Set wsDATA = Worksheets("List1")

RADEK = wsDATA.Cells(Rows.Count, "A").End(xlUp).Row
For i = 1 To RADEK
OriginalText = wsDATA.Cells(i, 1).Value
CorrectedText = Replace(OriginalText, ".", ".")
wsDATA.Cells(i, 1).Value = CorrectedText

Next i

End Sub

Tak potom by se to asi muselo řešit nějakým makrem nebo něco, ale to takhle dáme asi těžko dohromady.


Strana:  1 ... « předchozí  10 11 12 13 14 15 16 17 18   další » ... 44

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje