Ein User gibt über eine InputBox eine Spalte an.
Das Makro gibt dann an, wieviele Spalten dazwischenliegen.
Wie ist das lösbar?
Danke im voraus
Ciao
zu wenig Information!
In welcher Form gibt der User die spalte an? (A, oder als Zahl)
zwischen welcher spalte?
es ist lösbar
gruß
Steffen
versteh ich nicht: wozwischen?
Gruß
Micha
hoffe, ich verstehe Deine Frage richtig. Hast Du schon einmal probiert die Spaltenüberschriften nicht mit A,B,C etc anzeigen zu lassen - sondern mit 1,2,3,? Dann kannst Du die Differenzen ziehen.
Das geht im Extras Menü Stichwort z1S1.
Viel Erfolg
joost
Der User gibtüber eine InputBox einen Buchstaben ein.
z.B. "C"
Und dann soll das Makro per MsgBox ausgeben wieviele Spalten man von Spalte A entfernt ist.
In diesem Beispiel 2
Ciao
Netter Tipp, aber dann würden ja keine Formeln mehr funktionieren!
Ciao
warum nicht gleich so!?
Sub Makro1()
Do
spalte = InputBox("Geben Sie die Spalte ein!")
Loop While Len(spalte) <> 1
MsgBox "Sie sind " & Range(spalte & "1").Column - 1 & " Spalten von der Spalte A entfernt!"
End Sub
Gruß
Steffen D
Ich habe da etwas übersehen.
Wie kommt man über diese Formel ausgerechnet auf die Spalte A?
Ciao
verstehe deine Frage nicht ganz!
die Spalten kann man auch mit Zahlen ansprechen,
ich gebe einfach die nummer der spalte aus (die über die inputbox eingegeben wurde)
wenn du das -1 wegmachst, dann zeigt er dir nur die nummer der spalte(in deinem beispiel ist die Spalte-C nummer 3)
Gruß
Steffen D
Was würde passieren, wenn der User z.B. E eingibt und er die Differenz zu B ausgeben soll?
Ciao
dann einfach den code ändern:
statt wert-1 schreibst du wert-2
warum 2? weil die Spalte B die nummer 2 hat! musst du von links zählen...
Gruß
STeffen