Gruppen
- Top Gruppen
- Betriebsysteme
- Windows classik
- Linux
- BS-Sonstige
- Software
- Datenbanken
- Bildbearbeitung
- Audio/mp3/Video
- Security/Viren
- SW-Sonstige
- Hardware
- Mainboard/CPU
- Grafikkarten
- Peripherie
- Laptop/Notebook
- HW-Sonstiges
- Netzwerk
- Telefon,ISDN,Modem
- W-Lan
- NW-Sonstiges
- Programmierung
- PHP,ASP,Perl...
- Java,C++...
- Webseiten/HTML
- Sonstiges
- PC-Sonstiges
- Plauderecke
- SN Intern
- Test
/ Forum / Tabellenkalkulation
Tabellenkalkulation
Fragevon fedjo vom 03.02.2021, 16:28 Options
Zahlen abkürzen
Hallo Excelfreunde,
ich in einer Spalte (C2:C53) alle Kalenderwochen in Text Format stehen.
01
02
03
50
51
52
Wie kann ich bei den Zahlen (01-09) die Null mit VBA löschen?
Danke im Voraus für Eure Hilfe
Gruß
fedjo
ich in einer Spalte (C2:C53) alle Kalenderwochen in Text Format stehen.
01
02
03
50
51
52
Wie kann ich bei den Zahlen (01-09) die Null mit VBA löschen?
Danke im Voraus für Eure Hilfe
Gruß
fedjo
Antwort 1 von Hajo_Zi vom 03.02.2021, 16:35 Options
Hallo Fedjo,
die stehen bestimmt hintereinander, den Bereich (01:09) markiere Und Strg+H
Gruß Hajo
die stehen bestimmt hintereinander, den Bereich (01:09) markiere Und Strg+H
Gruß Hajo
Antwort 2 von fedjo vom 03.02.2021, 16:44 Options
Hallo Hajo,
danke für die schnelle Antwort.
die Kalenderwochen kommen aus SAP stehen in einer Spalte untereinander. Die Nullen sollten schon mit einem Code gelöscht werden.
Gruß
fedjo
danke für die schnelle Antwort.
die Kalenderwochen kommen aus SAP stehen in einer Spalte untereinander. Die Nullen sollten schon mit einem Code gelöscht werden.
Gruß
fedjo
Antwort 3 von rainberg vom 03.02.2021, 16:51 Options
Hallo Fedjo,
warum formatierst Du die Spalte nicht als Zahl, wenn Dich die führende Null stört?
Ist doch Arbeitsbeschaffung, oder...?
Gruß
Rainer
warum formatierst Du die Spalte nicht als Zahl, wenn Dich die führende Null stört?
Ist doch Arbeitsbeschaffung, oder...?
Gruß
Rainer
Antwort 4 von fedjo vom 03.02.2021, 17:05 Options
Hallo Rainer,
die Kalenderwoche wird durch eine Formel (=KALENDERWOCHE(A3) (KW 6) in einer anderen Zelle angezeigt. Das Makro sucht aber nach der aktuellen KW 6 und nicht nach 06. Ich müßte immer die Spalte umformatieren, wenn ich neue Zahlen erhalte.
Gruß
fedjo
die Kalenderwoche wird durch eine Formel (=KALENDERWOCHE(A3) (KW 6) in einer anderen Zelle angezeigt. Das Makro sucht aber nach der aktuellen KW 6 und nicht nach 06. Ich müßte immer die Spalte umformatieren, wenn ich neue Zahlen erhalte.
Gruß
fedjo
Antwort 5 von rainberg vom 03.02.2021, 17:21 Options
Hallo Fedjo,
ich bin verwirrt.
Du schreibst die KW stehen in C2:C53 (im Textformat) - darauf hatte ich geantwortet.
Dann schreibst Du die KW kommen aus SAP und zu guter Letzt werden sie durch =KALENDERWOCHE(A3) erzeugt.
Die Formel liefert aber eine Ganzzahl und keinen Text????
Weiterhin sprichst Du jetzt von einem Makro, von dem erst keine Rede war und was wir leider nicht kennen.
Vielleicht kannst Du mal Licht ins Dunkel bringen.
Gruß
Rainer
ich bin verwirrt.
Du schreibst die KW stehen in C2:C53 (im Textformat) - darauf hatte ich geantwortet.
Dann schreibst Du die KW kommen aus SAP und zu guter Letzt werden sie durch =KALENDERWOCHE(A3) erzeugt.
Die Formel liefert aber eine Ganzzahl und keinen Text????
Weiterhin sprichst Du jetzt von einem Makro, von dem erst keine Rede war und was wir leider nicht kennen.
Vielleicht kannst Du mal Licht ins Dunkel bringen.
Gruß
Rainer
Antwort 6 von fedjo vom 03.02.2021, 18:06 Options
Hallo Rainer,
ich habe es jetzt so gelöst : Sheets("Daten").Columns(3).Cells.Replace What:="01", Replacement:="1", LookAt:=xlWhole, SearchOrder _
:=xlByColumns, MatchCase:=False
Da wird natürlich 9 mal gesucht was ich eigentlich nicht wollte.
Erklärung:
Die KW werden aus SAP in eine Tabelle C2:C53 (im Textformat). erzeugt.
Mit der aktuellen KW ( =KALENDERWOCHE) aus einer anderen Tabelle wird mit einem Makro in der Tabelle mit den (01-52 KW) gesucht.
Es wird also mit 6 gesucht in der Tabelle wo 06 steht .
strSuch = Sheets("Lieferzeiten").Range("A5").Value
lngAnz = WorksheetFunction.CountIf(Columns(3), strSuch)
Columns(3).Find(What:=strSuch, LookIn:=xlValues, LookAt:= _
xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:= _
False).Activate
Wahrscheinlich kann ich es nicht so richtig erklären.
Gruß
fedjo
ich habe es jetzt so gelöst : Sheets("Daten").Columns(3).Cells.Replace What:="01", Replacement:="1", LookAt:=xlWhole, SearchOrder _
:=xlByColumns, MatchCase:=False
Da wird natürlich 9 mal gesucht was ich eigentlich nicht wollte.
Erklärung:
Die KW werden aus SAP in eine Tabelle C2:C53 (im Textformat). erzeugt.
Mit der aktuellen KW ( =KALENDERWOCHE) aus einer anderen Tabelle wird mit einem Makro in der Tabelle mit den (01-52 KW) gesucht.
Es wird also mit 6 gesucht in der Tabelle wo 06 steht .
strSuch = Sheets("Lieferzeiten").Range("A5").Value
lngAnz = WorksheetFunction.CountIf(Columns(3), strSuch)
Columns(3).Find(What:=strSuch, LookIn:=xlValues, LookAt:= _
xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:= _
False).Activate
Wahrscheinlich kann ich es nicht so richtig erklären.
Gruß
fedjo
Ähnliche Themen
Formatierung Zahlen
Rolando 02.08.2007 - 96 Hits - 1 Antwort
Benutzerdefinierte Zahlen
kvtv 16.08.2007 - 51 Hits - 4 Antworten
Zahlen sortieren
hias1706 03.10.2007 - 116 Hits - 1 Antwort
Namen zusammenfassen und Vornamen abkürzen
Ladislaus 19.12.2007 - 102 Hits - 8 Antworten
Zahlen in Spalten
fedjo 15.09.2008 - 51 Hits - 6 Antworten
Hinweis
Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..
Neue Einträge
