Spalten mit variablem Namen ansprechen
01.03.2017 14:57:32
Kaan
Ich hätte da ein kleines, aber auf Dauer nerviges, Problem.
Ich habe eine Excel Tabelle, die jeden Monat 2 Spalten dazubekommt. Diese Spalten haben entweder die Überschriften "Bestellte Menge X Produkte" oder "Bestellte Menge Y Produkte" und stehen immer in Zeile 2.
Wenn diese nun aber in meine Tabelle eingetragen werden, aber vom vorherigen Monat schon Daten drinstehen, ändern sich die Namen der neu dazukommenden Spalten zu "Bestellte Menge X Produkte2" und "Bestellte Menge Y Produkte2". Nach 10 mal durchlaufen heißen diese dann "Bestellte Menge X Produkte10" und "Bestellte Menge Y Produkte10" usw., ich glaube ihr wisst wo das hinläuft.
Das ist für mich aber leider ein Problem, da ich gerne hätte das jede Spalte, egal wie oft die Überschrift schon vorhanden ist, die Überschrift "Bestellte Menge X Produkte" oder "Bestellte Menge Y Produkte" beibehält.
Das hat mit dem Code zu tun der dann mit den Daten weiter arbeiten muss.
Kann man das irgendwie abstellen, dass jede Spaltenüberschrift einen einzigartigen Namen haben muss?
Falls das nicht möglich ist, wie kann ich meinen Code ändern, dass ich dieses Problem nicht mehr habe?
Mein Code ist Dank der Hilfe eines netten VBA Experten hier aus dem Forum zustande gekommen. Beim weiteren arbeiten mit dem Code ist mir dann dieses kleine aber feine Problem über den Weg gelaufen.
Hier ein kleiner Ausschnitt aus dem Code:
Sub Gesamtergebnis()
Dim rZelleX As Range
Dim sSuchX As String: sSuchX = "Bestellte Menge X Produkte"
With ThisWorkbook.Worksheets("Sheet1").Rows(Range("A2").Row)
Set rZelleX = .Find(What:=sSuchX, After:=Range("A2"), LookIn:=xlValues, _
LookAt:=xlWhole, SearchDirection:=xlNext)
End With
End Sub
Mit dem obigen Code sucht er nach der Überschrift "Bestellte Menge X Produkte" (bei der zweiten Überschrift wäre es das gleiche, deshalb habe ich sie hier weggelassen)
Wenn ich genau weiß, dass zu der Überschrift eine 2 oder andere einstellige Zahl dazukommt, dann kann ich eine weitere Suchvariable mit = "Bestellte Menge X Produkte" & "?" deklarieren, das würde so funktionieren.
Nun kann es aber sein dass in einem Jahr dort 100 Spalten hinzugefügt wurden, dann müsste der Code auch die Überschrift "Bestellte Menge X Produkte50" oder "Bestellte Menge X Produkte100" finden können. Ich könnte für jeden dieser Fälle eine eigene Suchvariable mit " & "?" " oder " & "?" " (etc.) deklarieren, ja, aber ich kann mir nicht vorstellen dass das die beste Lösung ist.
Ich entschuldige mich für die Menge an Text, ich wusste mich nicht kürzer zu fassen!
Mit freundlichen Grüßen,
Kaan