Tabellenbereich verändern
08.01.2020 07:38:05
Zopf
ich versuche gerade diesen Code:
If IsNumeric([B3].Value) Then
ActiveSheet.ListObjects("Tabelle1").Resize Range("$A$2:$E$3")
End If
in eine Schleife umzuwandeln, damit sie für die komplette Tabelle drüberläuft.
Allerdings tu ich mich hier sehr schwer, da ich wirklich absoluter VBA-Laie bin.
Die Tabelle erstreckt sich von A3 bis E92 und soll immer dann den Bereich verändern, wenn in Spalte B ein numerischer Wert auftaucht. Die Tabelle soll dann in ihrer letzten Zeile den letzten numerischen Eintrag der Spalte haben. Es wäre super wenn mir irgendjemand eine Hilfestellung geben könnte!
Vielen Dank und lieben Gruß,
Zopf