---

Hallo zusammen,
ich bin VBA Neuling 
mein Problem ist folgendes:
Ich habe in einer Tabelle in Spalte B solche Zahlen stehen wie 71300, 70700, 70800, 71300, 70900, 71000, 71009
zur Erklärung für die, die es interessiert, das sind datumsangaben wie zb 70700 = 2007.07.00 (00 steht für den gesamten monat). Bei der Zahl 71009 handelt es sich um eine Korrektur vom Vormonat (die 09 steht für Monatskorrektur September)
jetzt möchte ich gerne dass das VBA Makro die gesamte Spalte B durchläuft und alle Datensätze (also gesamte betreffende Zeile), die nicht auf 00 enden, in eine neue Tabelle kopiert, kann mir da jmd helfen? 

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Snuffel,

willkommen auf CAD.de!

Probiers erst mal ohne VBA - ist einfacher und führt schneller zu Erfolgserlebnissen . Menü Daten - Filter - Autofilter oder - Spezialfilter - an andere Stelle kopieren, wenn mich nicht alles täuscht...

Nebenbei bemerkt, auf den ersten Blick und ohne die Tiefe eurer Nummernvergabe genauer zu kennen: Entweder im Oktober (10) oder im Jahr 2010 wird eure Schlüsselnummer um eine Ziffer länger.

Frederik

------------------
DIN1055.de  |  Lastannahmen für Anwender

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Danke für die nette Begrüßung ;-)
es muss leider mit VBA sein, denke ich zumindest
das hier ist ja nur ein Schritt von vielen, die richtige Zahl ist ja eigentlich auch 071000, nur Excel macht die erste Null halt weg
Diese Zahlen kommen aus einem Export von einem Programm, und sind auch mit einem anderen Makro bereits formatiert worden (in der selben Tabelle), wenn ich nun die Formeln einfach ohne VBA in die Zellen schreibe, dann wird mir der export das ja einfach überschreiben, oder?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Zitat:

---

nur Excel macht die erste Null halt weg

---

Format - Zellen - Zahlen - Benutzerdefiniert - ?000000 eingeben, dann wird die führende Null mit angezeigt.

Zitat:

---

wenn ich nun die Formeln

---

Welche? Angenommen, in Spalte B stehen Formeln, und Du fügst in Spalte A was ein, dann wird in B nichts überschrieben ;-).

Zitat:

---

es muss leider mit VBA sein, denke ich zumindest

---

Das finde ich etwas gewagt. Hast Du denn die Filter schon alle ausprobiert und tatsächlich festgestellt, dass sie für Deinen Zweck nicht genügen?

------------------
DIN1055.de  |  Lastannahmen für Anwender

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Snuffel,

am besten du stellst mal eine Beispielmappe hier hoch.
Also: empfindliche Daten entfernen, Mappe unter MeineMappe.XLS.TXT speichern und dann hier hochladen! Vielleicht geht es ja, wenn du die Spaltenköpfe drinnen lässt! 
Und dann kann man sehen, auf was man sich da einlässt. Und diejenigen, die Spass am VBA haben, können ihren Code dann gleich testen!
Beste Grüße

Tobias

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

MeineMappe.xls.txt

Ok ich habe die Mappe angehängt.
MIt Strg+M werden die Spalten in die richtige Form gesetzt. habe jetzt 3 datensätze drin gelassen, einen der nicht auf 0 endet in Spalte B

Alex

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Spalte B als Text (!) formatieren - auch dann werden ja die führenden Nullen angezeigt. (Den benutzerdefinierten Filter mit Zahlen und "endet nicht mit" 0 mag mein xls nicht.)
Benutzerdefinierter (Text-)Filter - endet nicht mit: 0 einstellen
Die sichtbaren Zeilen händisch  kopieren und in ein anderes Blatt einfügen.

Die ganze Aktion lässt sich doch auch mit dem Makro-Recorder aufzeichnen..?

------------------
DIN1055.de  |  Lastannahmen für Anwender

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Es hat geklappt, vielen Dank! 

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP