ich habe das folgende Ziel.
Suche einen Wert in der ersten Zeile in einer beliebigen Spalte, aus einer anderen Tabelle aus der ersten Spalte einer beliebigen Zeile, und füge danach eine freie Zeile ein. Hier fügt VBA immer mehrere Spalten ein und nicht nur eine. Könnt ihr mir bitte sagen, was ich verkehrt mache?
For i = 1 To Letztespalte
For y = 1 To letztezeile
If Cells(1, i) = Worksheets("Begriffe").Range("A" & y) Then
Cells(1, i).Select
Selection.EntireColumn.Insert
End If
Next
Next
Lieben Dank Gruß Florian