Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1104to1108
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Kopieren mit VBA
Mister
Hallo und guten Abend,
mit folgendem Befehl kopiere ich Daten von einer Datei zur anderen:
Workbooks(strMap2).Sheets("PersDaten").Cells(1, 1).Copy Workbooks(strMap1).Sheets("Persdaten").Cells(1, 1) 'Name
Nun ist das Problem, dass in der zu kopierenden Zelle eine Formel steht. Ich möchte aber das der Wert der Zelle kopiert wird und nicht die Formel. Wie muss ich den Befehl ändern.
Danke und Gruß
Martin

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Kopieren mit VBA
03.10.2009 17:25:05
Daniel
HI
so z.B.
Workbooks(strMap1).Sheets("Persdaten").Cells(1, 1).Value = Workbooks(strMap2).Sheets("PersDaten").Cells(1, 1).Value
oder zeichen mal die Excel-Funktionen KOPIEREN und BEARBEITEN - INHALTE EINFÜGEN - WERTE mit dem Recorder auf, dann siehst du, wie das geht.
Den aufgezeichneten Code musst du natürlich noch anpassen und die ganzen Selects entfernen, aber du siehst zumindest mal, wie der VBA-Befehl für diese Funktion aussieht.
Gruß, Daniel
AW: Kopieren mit VBA
03.10.2009 17:25:55
Gerd
Workbooks(strMap1).Sheets("Persdaten").Cells(1, 1) = Workbooks(strMap2).Sheets("PersDaten").Cells(1, 1).Value 'Name
Hallo Martin,
Gruß Gerd
Anzeige
AW: Kopieren mit VBA
03.10.2009 19:02:17
Mister
Danke!
Beide Variationen funktionieren.
Gruß
Martin

299 Forumthreads zu ähnlichen Themen


Hallo
Eines schon mal Vorweg. Bin ein Excel Neuling und bitte daher um Verständnis, dass ich mit dieser wahrscheilich sehr einfachen Excel Problematik nicht weiterkomme.
Es geht um folgenden Tabellentyp:
http://www.bilder-space.de/show.php?file=F5RPKSe80cyrouj.jpg
Wie man sieht...
Anzeige

Hallo liebe Spezialisten,
ich habe mal wieder ein Problem und hoffe auf Hilfe :-)
Hier im Forum habe ich den folgenden Code zum deaktivieren von „Drag&Drop“ bekommen.
Private Sub Workbook_Activate() 'Verhindert Drag&Drop (Teil-1) Application.CellDragAndDrop = False End Sub...

Hallo liebe Excel-Freunde,
wer kann mir helfen, eine Aufgabenstellung, die ich zwar mit Formeln gelöst habe mit einem VBA Makro zu lösen. Wie kopiere und paste ich Werte aus einer Tabelle1 in eine Tabelle2, abhängig davon ob ein Wert in einer bestimmten Spalte ist. Das Beispiel habe ich zum...
Anzeige

Hallo Herber Fans,
ich bin heute erstmalig mit einem Problem konfrontiert worden, welches keiner rationalen Logik zu folgen scheint. Auch im Forum habe ich dazu bisher nichts gefunden und wollte fragen, ob damit schon Erfahrung besteht, oder ich vielleicht auch einfach einen Denkfehler habe...

Hallo
einen Beispieldatei ist anbei!!
Bisher konnte ich mit folgendem Code Zellinhalte "täglich" teilen und in neue Zellen kopieren.
Sheets("179").Select Range("B255").End(xlUp).Offset(1, 0).Select ActiveCell.FormulaR1C1 = "=TRIM(LEFT('tägliche Statistik'!R12C6,FIND(""/"",'täglic...

Hallo,
kann mir bitte mal jemand bei folgendem Makro helfen:
'Rows("2:2").Select
Selection.Copy
Range("A3").Activate
Do Until ActiveCell.Value = ""
ActiveCell.Offset(1, 0).Activate
Loop
ActiveSheet.Paste
Selection.Copy
Selection.PasteSpecial Paste:=xlValu...
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige