Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
908to912
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
908to912
908to912
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Makro gesucht für automatische Markierung Bereich

Makro gesucht für automatische Markierung Bereich
21.09.2007 10:56:00
Becker
Suche einen einfachen Makro bei dem ein knopf in der arbeitsmappe ist, wenn man diesen drückt wird ein bestimmter Bereich in der Mappe markiert.
siehe Beispieldatei.

Die Datei https://www.herber.de/bbs/user/46242.xls wurde aus Datenschutzgründen gelöscht


6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro gesucht für automatische Markierung Bere
21.09.2007 11:12:06
Renee
Hi Becker,
Mit der Steuerelemente Toolbox füge eine Schaltfläche ein.
Doppelklicken und dann diesen Code einfügen:

Private Sub CommandButton1_Click()
ActiveSheet.Range("D5:G" & _
ActiveSheet.Cells(ActiveSheet.Rows.Count, 7).End(xlUp).Row).Select
End Sub


GreetZ Renee

Noch ein Problem
21.09.2007 11:37:00
Becker
sorry habe meine Frage wohl nicht spezifisch genug gestellt.
so funktioniert es nur wenn alle Zellen D-G gefüllt sind. Sollte aber auch funktioneren wenn nur die Zellen in Spalte D (siehe Beispieldatei Frage2) gefüllt sind und selektiv in den anderen Spalten Werte drin stehen.

Anzeige
AW: Noch ein Problem
21.09.2007 11:46:00
Renee
Hi Becker,
Dann ersetz in meinem Code, die 7 durch eine 4.
GreetZ Renee

AW: Noch ein Problem
21.09.2007 22:48:35
klaudia
Dann ersetz in meinem Code, die 7 durch eine 4.und kommt misst raus

Trolle sollen sich trollen! owT
24.09.2007 19:10:00
Renee

AW: Makro gesucht für automatische Markierung Bereich
21.09.2007 11:17:03
Torsten
Hi,
Der Code

Sub markieren()
Range("d5", Range("g65536").End(xlUp)).Select
End Sub


In der Datei mit Button:
https://www.herber.de/bbs/user/46243.xls
Zu deiner Zufriedenheit?
gruß
Torsten

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige