|
Hallo Community,
vorab Danke an alle die sich mit dem Thema beschäftigen.
Ich habe folgende Fragestellung:
Ich habe zwei Tabellen, in der einen die Spalten A, B, C mit jeweils Werten und in der anderen Tabelle A, C, B, allerdings ohne Werte.
Die frage ist, wie bekomme ich die Werte aus der ersten Tabelle in die andere Kopiert, ohne dabei die Spaltenstruktur zu verändern.
Ich hatte folgenden Ansatz, allerdings erfolglos
Sub SpaltenVergleichenUndFüllen()
Dim lngSpalten As Long
Dim lngSpaltenMax As Long
'Worksheets definieren
'Quelle und Ziel
Dim wksQuelle As Worksheet
Dim wksZiel As Worksheet
'Quelle und Ziel setzen
Set wksQuelle = Tabelle1
Set wksZiel = Tabelle2
'Wir wollen die Spalten aus der Quelle betrachten
With wksQuelle
lngSpaltenMax = .UsedRange.Columns.Count
For lngSpalten = 1 To lngSpaltenMax
'Hier weiß ich nicht mehr weiter.
Next lngSpalten
End With
End Sub
Ich freue mich über jede Hilfe und bedanke mich vorab an alle.
Viele Grüße
Emin
|