Forum » Pomoč in nasveti » Excel vprašanje
Excel vprašanje
Beralios ::
Mam težavo.
V celicah stolpcu imam desetmestno številko/šifro.
Kako iz celotnega stolpca odstranim vse razen zadnjih štirih cifer vsake številke?
Hvala že vnaprej za odgovore.
V celicah stolpcu imam desetmestno številko/šifro.
Kako iz celotnega stolpca odstranim vse razen zadnjih štirih cifer vsake številke?
Hvala že vnaprej za odgovore.
Those are my principles, and if you don't like them... well, I have others.
amigo_no1 ::
Napišeš (skopiraš) makro (Alt+F11 v Excelu, skopiraš makro , zapreš urejevalnik, poženeš makro (meni Orodja, makro , makri ):
http://www.mrexcel.com/td0033.html
Se da pa tudi s pomočjo ultraedit-a (da izvoziš podatke ) , ki tudi podpira makre
http://www.mrexcel.com/td0033.html
Se da pa tudi s pomočjo ultraedit-a (da izvoziš podatke ) , ki tudi podpira makre
Zgodovina sprememb…
- spremenilo: amigo_no1 ()
smetko ::
s pomočjo funkcije
=RIGHT(TEXT(A1;"0000000000");4) če predpostavim da imaš podatek v celici a1.
=RIGHT(TEXT(A1;"0000000000");4) če predpostavim da imaš podatek v celici a1.
No comment
Beralios ::
@jeje997
...ja tole bi moglo bit to, samo ne znam pravilno preuredit makra da mi zbriše prvih 7 cifer
...ja tole bi moglo bit to, samo ne znam pravilno preuredit makra da mi zbriše prvih 7 cifer
Those are my principles, and if you don't like them... well, I have others.
Beralios ::
Tkole je šlo:
Data>text to columns, fixed width , določil znake , import
easy (pol k se ubadaš s tem par ur)
Data>text to columns, fixed width , določil znake , import
easy (pol k se ubadaš s tem par ur)
Those are my principles, and if you don't like them... well, I have others.
amigo_no1 ::
Malo sem preuredil zgornji makro, ki pobriše zadnje 4 cifre/znake:
Tako:
Sub Pusti_Zadnje_4()
For Each cell In ActiveSheet.Cells.SpecialCells(xlCellTypeConstants)
cell.Value = Right(cell.Value, Len(cell.Value) - 6)
Next cell
End Sub
Tako:
Sub Pusti_Zadnje_4()
For Each cell In ActiveSheet.Cells.SpecialCells(xlCellTypeConstants)
cell.Value = Right(cell.Value, Len(cell.Value) - 6)
Next cell
End Sub
Zgodovina sprememb…
- spremenilo: amigo_no1 ()
Vredno ogleda ...
| Tema | Ogledi | Zadnje sporočilo | |
|---|---|---|---|
| Tema | Ogledi | Zadnje sporočilo | |
| » | Excel: tiskanje po vrsticahOddelek: Pomoč in nasveti | 1175 (1088) | luksorzi |
| » | Calc/excel delo s tabeloOddelek: Programiranje | 1506 (1273) | salabajs |
| » | excel+visual basicOddelek: Pomoč in nasveti | 1619 (1506) | švrk |
| » | [Excel]Kako izvleči vrednost?Oddelek: Programiranje | 3883 (3606) | Mobidick |
| » | [Excel] Deljenje vrednosti celice in izpis rezultataOddelek: Programiranje | 2689 (2580) | Zupa852 |