Office: Sprungmarke über Schaltfläche

Hallo,

ich hab wiedermal ein Problem und benötige euere Hilfe.

Gibt es eine Möglichkeit bei Excel ein Sprungmarke einzurichten und wenn ja wie geht das dann. Sowas wie "Gehe zu".

Zweck: Ich hab eine Tabelle, die geht über zig Spalten. Von Spalte A - DC werden Daten eingetragen. Nun möchte ich in der Spalte A einen Button einrichten damit ich in die Spalte DD springe um dort einen Kommentar einzutragen wenn ich den Button in Spalte A anklicke.

Vielen Danke vorerst mal für euere Bemühungen.

 

Hallo,

muss das unbedingt ein Button sein?

Hilft dir die Tastenkombination Strg+G weiter? Bei Verweis trägst du einfach die Zelle ein in die du willst und bestätigt mist Enter.

 

Hallo Peter,
wow, das ging schnell.

Weiß ich nicht genau, weil ich auch noch Zeilen bis 152 hab.
Hier sind immer 3 Zeilen gekopplet. In der oberen Zeile wird die Sollarbeit eingetragen, in der mittleren Zeile darunter die Istarbeit und in der 3. Zeile wollte ich den Button setzen, damit ich schneller von der Spalte A in die Spalte DD gelage.
Ich muß noch dazu sagen, das Sheet ist bis auf die Eingabefelder gesperrt.

Mit einer Schaltfläche ginge es halt schneller und ich müßte nicht jedem Kollegen erklären wie es mit Strg+G geht. Wäre halt für mich einfacher.

 

Hallo,

wenn das Tabellenblatt bis auf die Eingabefelder gesperrt ist, dann könntest du doch mit der Tab-Taste von Zelle zu Zelle navigieren.

 

Hallo Peter,

wollte dir ein Muster anhängen, aber ich bekomme immer eine Fehlermeldung.


Das Problem ist, von der Spalte A - DD sind immer nur einzelne Zellen gesperrt. Dazwischen von Spalte G - CZ ist in der oberen und mittleren Zeile kein Feld gesperrt. Ich müßte mich also bis ganz nach hinten durch klicken.

Gib es nicht etwas einfacheres

 

Hallo Peter,

ich hab jetzt noch einiges gelesen, aber meine VBA-Kenntnisse sind gleich null.
Ein Erfolg war auf jedenfall, wenn ich auf die Schaltflache ging, sprang es nicht die Zelle DE3 an sondern DE5, was habe ich da falsch gemacht.
DenCode hab ich verwendet.

Private Sub CommandButton1_Click()

Range("DE3").Select
Do Until ActiveCell.Value = Range("a1").Value
ActiveCell.Offset(RowOffset:=1, ColumnOffset:=0).Select
If ActiveCell.Value = "" Then End
Loop

End Sub


Was ich dann nicht weiß, wenn ich jetzt in A5, A9, A13, A17 usw. so eine Schaltfläche habe und die betätige, spricht der Courser immer nur in die A5 Zelle oder was muß ich machen um die anderen anzuspringen.

 

Hallo Peter,

ich hab das Problem gelöst und zwar hab ich einen Hyperlink in die verschiedenen Zellen eingefügt.
Nachteil ist halt, daß ich die Zelle freigeben muß. Aber es funktioniert so auch einwandfrei und erfüllt seinen Zweck.

Also Danke nochmal für deine Hilfe und noch ein schönes Wochenende für das was noch übrig.