Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
948to952
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
948to952
948to952
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Nummer hochzählen

Nummer hochzählen
07.02.2008 17:15:00
P.Ro
Hallo,
vermutlich komme ich mit einem alten Problem. Ich möchte auf einer Excel Seite eine Nr/Rechnungsnummer auf Knopfdruck hochzählen lassen. Der Wert sollte aber überschreibbar sein um einen Doppelklick rückgängig machen zu können.
Für eure Hilfe wäre ich dankbar.
Gruß
Paul
Wer kann mir denn ein gutes Einsteiger-Buch in die VBA-Welt empfehlen?

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Nummer hochzählen
07.02.2008 17:37:00
P.Ro
Habe eine Lösung gefunden:

Sub hochzaehlen()
' hochzaehlen Makro
' Makro am 07.02.2008 von pr aufgezeichnet
' C8, eine beliebige Zelle wählen für die Rückmeldung
' E1 bekommt C8 +1
' Copy E1 und einfügen des Wertes in C8
Range("E1").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "=R[7]C[-2]+1"
Range("E1").Select
Selection.Copy
Range("C8").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub


Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige