PDA

Vollständige Version anzeigen : kopieren und einfügen von Daten über Makro


gs0586
11.04.2012, 17:34
Hi,

ich bin noch recht unerfahren was die ganze VBA Sache angeht.

Mein Problem lautet wie folgt:

ich möcht aus Tabelle1 im Bereich A:C die Daten die sich erzeugen kopieren und in Tabelle2 einfügen, allerdings dürfen sich dabei nur die Werte kopiern.

Das habe ich auch schon hinbekommen.
Nun ändern sich aber die werte in Tabelle1 aber aller 5 Minuten und diese sollen auch in Tabelle2 eingefügt werden aber eben direkt unter den letzten festen Wert in Tabelle2.

Aktuell habe ich folgenden Code:

Sub A_Test()
Dim Zei As Long
Zei = Worksheets("Tabelle1").Range("A" & Rows.Count).End(xlUp).Row
Worksheets("Daten").Range("A1:C10").Copy
With Worksheets("Tabelle1").Range("A" & Zei)
.PasteSpecial Paste:=xlValues
End With
End Sub

dieser hat aber zur folge wenn ich ihn zwei mal ausführe lässt er immer die 10 Zeilen platz.


Okay, ich hoffe ihr könnt mir helfen.


Grüße Gregor

Hajo_Zi
11.04.2012, 17:39
Hallo Gregor,

viellleicht reicht speichern?

<img src="http://Hajo-Excel.de/images/grusz1.gif" align="middle" height="40" alt="Grußformel"><a href="http://Hajo-Excel.de/index.htm" onclick="window.open(this.href);return false"><img border="0" src="http://Hajo-Excel.de/images/logo_hajo3.gif" align="middle" height="40" alt="Homepage"></a>

gs0586
11.04.2012, 17:55
was meinst du mit speichern?

es gibt eine webabfrage aus der in bestimmte daten ziehe die größer 5 minuten sind, dass mache ich über eine einfache excel formel. da sich diese daten regelmäßig ändern, möchte ich das es über dieses makro speichert in einem extra tabellenblatt.

die abgerufenen daten sind 50 zeilen lang aber nicht in jeder zelle steht was drin das wäre auch cool wenn er nur die zellen mit inhalt kopieren würde aber ich denke dass das makro nicht unter richtigem wert und der formel die drin steht unterscheiden kann. ich möchte halt das er die werte nur kopiert und wenn ich das mache und das makro noch einmal starte speichert es halt nicht unter dem letzten wert sondern ganz am ende des vorher kopierten bereiches.

Hmm, viel text. ich hoffe ihr versteht dennoch mein problem.

Grüße

Hajo_Zi
11.04.2012, 18:32
also ich klicke auf Datei und speichern oder Str+s oder .save.

<a href="http://Hajo-Excel.de/index.htm" target="_blank" title="Hajo's Excelseiten">Gruß Hajo</a>

user gs0586
11.04.2012, 19:28
hi,

was hat speichern mit dem genannten problem zu tun?

Das Problem ist das kopieren und enfügen über vba und dem ansetzen an den letzten wert in der zweiten tabelle.


Grüße Gregor

Hajo_Zi
11.04.2012, 19:34
gut gregor, dann hast Du mehr Ahnung von VBA als ich. Ich hatte angenommen die letzte Zeile wird nicht korrekt ermitteltt.

<a href="http://Hajo-Excel.de/index.htm" target="_blank" title="Hajo's Excelseiten">Gruß Hajo</a>