Mit VLOOKUP Zelle kopieren
Jordan
ich tret mal wieder auf der Stelle!
Ich möchte mit VLOOKUP nicht nur den Wert der Zelle kopieren, sondern auch das Format.
In meinem Beispiel schreibt er mir neben die Zahl diese ausgeschrieben hin.
z. B.
1 eins
2 zwei usw.
Ich hab aber den Zellen auch noch verschieden Farben gegeben. Die möchte ich mit rüberkopieren!
Nur wie?
Danke für Eure Hilfe!
Hier meine Datei:
https://www.herber.de/bbs/user/63383.xls
Hier mein Code:
Sub SverweisMitFormat()
Dim Bereich As Range
Dim i As Integer
With Tabelle1
Set Bereich = .Range("h5:i11")
For i = 5 To 11
.Cells(i, 2) = WorksheetFunction.VLookup(Cells(i, 1).Value, Bereich, 2, False)
Next i
End With
End Sub