|
Hallo zusammen,
ich hoffe INSTÄNDIG, dass mir hier jemand weiterhelfen kann, da ich seit Tagen nicht weiterkomme und nicht mehr weiß was ich noch tun soll…
Folgendes, eigentlich doch einfaches Problem, dass zwingend über ein Makro gelöst werden muss:
Ich habe eine Excel-QUELLDATEI und eine Excel-ZIELDATEI.
Ein Tabellenblatt aus der QUELLDATEI wird über eine Datenverbindung in die ZIELDATEI "eingebunden". Ich gehe hier über [Daten -> Verbindungen] in Excel. Der Abruf etc. funktioniert auch einwandfrei.
So, nun kommen wir langsam zum eigentlichen Problem:
Obwohl in der QUELLDATEI alle Zahlen auch als Zahlen gespeichert sind (und nicht Text), werden die Zahlen in der ZIELDATEI nicht als Zahlen interpretiert sondern als Text! Das führt natürlich dazu, dass mit den "Zahlen" nicht weitergerechnet werden kann!
Das fand ich jetzt eigentlich nicht sooo schlimm, denn das lässt sich manuell ja sehr simpel lösen: 1 in eine Zelle schreiben, die 1 kopieren, die als Text interpretierten Zahlen markieren, Rechtsklick, Inhalte einfügen, multiplizieren, fertig! FUNKTIONIERT!
Nun diesen manuellen Schritt jetzt einfach als Marko speichern und gut ist - EBEN NICHT!!! Das Makro läuft ohne Fehler durch, aber es ändert sich NICHTS! Im Gegensatz zur "manuellen" Variante :-(
Hier der VBA-Code:
Sub Mit_1_multiplizieren()
Cells(4, 3) = 1
Cells(4, 3).Select
Selection.Copy
Range("E9:F32").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlMultiply
End Sub
Hier findet ihr mein Minimalbeispiel:
https://www.dropbox.com/s/ogdw32boohut7tx/Problem.xlsm?dl=0
BITTE HELFT MIR!
Abschließender Hinweis: Das Beispiel ist wie gesagt ein Minimalbeispiel! In Wirklichkeit ist die Datei viel größer! Viel größer heißt ca. 300.000 Zeilen und 30 Spalten - also ca. 9.000.000 Zellen! Ich hatte auch schon andere VBA-Codes versucht (Schleifen etc.), diese funktionieren auch, laufen aufgrund der hohen Zellenanzahl aber STUNDEN!
Schon einmal vielen lieben Dank!
Schöne Grüße
Lisa
|