Forum » Pomoč in nasveti » Čšž makro v excelu
Čšž makro v excelu
zemfy ::
Ola!
Zanima me, če ima kdo makro v excelu za spreminjanje ;[\ v čšž. Namreč uporabljam neke text datoteke ki so narejeni v dos aplikaciji in jih nato posredujem v excelu in se mi ne da več vsako posebej popravljati z ukazom replace all...
Zanima me, če ima kdo makro v excelu za spreminjanje ;[\ v čšž. Namreč uporabljam neke text datoteke ki so narejeni v dos aplikaciji in jih nato posredujem v excelu in se mi ne da več vsako posebej popravljati z ukazom replace all...
- polepsal: Gandalfar ()
tratto ::
Poskusi tole:
Sub Macro1()
Cells.Select
Selection.Replace What:=";", Replacement:="č", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
Cells.Select
Selection.Replace What:="[", Replacement:="š", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
Cells.Select
Selection.Replace What:="\", Replacement:="ž", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
Range("A1").Select
End Sub
Potem pa si naredi bližnjico na gumb v orodni vrstici.
Sub Macro1()
Cells.Select
Selection.Replace What:=";", Replacement:="č", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
Cells.Select
Selection.Replace What:="[", Replacement:="š", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
Cells.Select
Selection.Replace What:="\", Replacement:="ž", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
Range("A1").Select
End Sub
Potem pa si naredi bližnjico na gumb v orodni vrstici.
Vredno ogleda ...
| Tema | Ogledi | Zadnje sporočilo | |
|---|---|---|---|
| Tema | Ogledi | Zadnje sporočilo | |
| » | [Excel]Kako izvleči vrednost?Oddelek: Programiranje | 4023 (3746) | Mobidick |
| » | Word 2003 VBA problemOddelek: Programska oprema | 1153 (1040) | mimax |
| » | Makro v worduOddelek: Pomoč in nasveti | 2229 (1943) | vvisoc_1 |
| » | Microsoft Excel - merged cells/insert row ...Oddelek: Programska oprema | 1262 (1211) | Tutankhamun |
| » | e107 spletni portal težave in rešitve...Oddelek: Izdelava spletišč | 2255 (1580) | pitagora |