Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Markierte Zellen plus 1

Markierte Zellen plus 1
18.07.2016 14:23:01
Dirk
Hallo zusammen,
habe folgenden Code bereits erfolgreich im Einsatz
Private Sub Workbook_Open()
Application.OnKey "{F9}", "DeinMakroName"
End Sub
***************************************************************
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.OnKey "{F9}"
End Sub

**************************************************************
Sub DeinMakroName()
Range(ActiveCell.Address).Value = Range(ActiveCell.Address).Value + 1
End Sub
***************************************************************
Jetzt sollte er nicht nur die einzelne Aktive Zelle +1 Zählen, sondern den markierten Bereich +1 Zählen....was müsste ich ändern!
Danke
DIRK

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Markierte Zellen plus 1
18.07.2016 14:42:40
baschti007
So was könnte ich dir anbieten ;)
Range(Cells(Selection.Row, Selection.Column), Selection.Cells(1 + Selection.Rows.Count, 1)).Address
AW: Markierte Zellen plus 1
18.07.2016 14:44:47
UweD
Hallo
Meinst du das?

Sub DeinMakroName()
Dim Zelle
For Each Zelle In Selection
Zelle.Value = Zelle.Value + 1
Next
End Sub

AW: Markierte Zellen plus 1
18.07.2016 14:45:51
Michael
Hi Dirk,
das geht z.B. so:
Sub DeinMakroName()
Dim c As Range
For Each c In Selection
c.Value = c.Value + 1
Next
End Sub
Schöne Grüße,
Michael
AW: Markierte Zellen plus 1
18.07.2016 14:52:08
Dirk
DANKE....geht @Michael bestens !!!
AW: Markierte Zellen plus 1
18.07.2016 14:50:10
Werner
Hallo Dirk,
geht das nicht auch direkt mit dem ausgewählten Bereich?
Sub DeinMakroName()
With Selection
.Value = .Value + 1
End With
End Sub
Gruß Werner
Anzeige
AW: Markierte Zellen plus 1
18.07.2016 15:14:02
UweD
Hallo Werner
hast du es mal ausprobiert, wenn mehr als eine Zelle markiert ist?
Dann kannst du dir die Antwort selber geben.
LG UweD
AW: Markierte Zellen plus 1
19.07.2016 08:14:24
Dirk
Hallo nochmal,
zusammen....gibt es auch die Möglichkeit, z.B. auf F3 nicht plus sondern minus 1 zu rechnen ?
AW: Markierte Zellen plus 1
19.07.2016 10:56:59
Dirk
.
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge