Das Archiv des Excel-Forums

Zelle oberhalb der ActivCell ansprechen

Bild

Betrifft: Zelle oberhalb der ActivCell ansprechen
von: Ingo

Geschrieben am: 13.10.2003 15:40:54

Hallo Exceliana,
ich möchte ein Makro erstellen, die durch z.B. die rechte maustaste in die ActiveCell die formel: ActiveCell=die Zelle oberhalb. Praktisch, wenn die ActiveCell A2 ist, soll in A2 die Formel: =A1.
geht das?
ich hoffe, dass ich mich verstendlich ausgedruckt habe
Bild


Betrifft: AW: Zelle oberhalb der ActivCell ansprechen
von: ChrisL
Geschrieben am: 13.10.2003 15:46:02

Hi Ingo


Private Sub Worksheet_BeforeRightClick(ByVal Target As Excel.Range, Cancel As Boolean)
If Target.Row > 1 Then Target.Formula = "=A" & Target.Row - 1
End Sub


Gruss
Chris


Bild


Betrifft: AW: Zelle oberhalb der ActivCell ansprechen
von: Ingo
Geschrieben am: 13.10.2003 16:00:41

Hallo Chris,
spitze!!!
D. Makro soll für eine Serie von Zelle funzionieren, nicht nur für a2=a1: z.B: D8:AH8 und so weiter. Das Heiß,dass wenn ich auf d8 drucke d8 wird =C8 und so weiter.
Gruß Ingo


Bild


Betrifft: AW: Zelle oberhalb der ActivCell ansprechen
von: ChrisL
Geschrieben am: 13.10.2003 16:13:20

Hi Ingo

So langsam verstehe ich gar nichts mehr, aber arbeite einfach mit den Werten Target.Row und Target.Column...

Target.Formula = Cells(Target.Row, Target.Column - 1).Address

Gruss
Chris


 Bild

Excel-Beispiele zum Thema " Zelle oberhalb der ActivCell ansprechen"

Zeilen oberhalb der markierten Zellen einfügen download Alle CheckBoxes einer UserForm ansprechen download
Office-Assistenten ansprechen download Gruppe von UserForm-ListBoxes über eine Schleife ansprechen download
UserForm-ComboBoxes als Collection-Objekte ansprechen download