Guten Tag,
ich möchte das eine Zahl im Excel automatisch um 1 hochzählt, wenn ich es gedruckt habe.
Also drucken - hochzählen…drucken - hochzählen…
Wie stelle ich das am besten an…???
bitte detailierte Beschreibung
Vielen Dank schon mal
Hallo,
das würde ich über einen Druckbutton relisieren, in dem der VBA-Code zum drucken steht und gleichzeitig die Zelle, in der die Zahl steht, um ein hochgerechnet wird.
Wenn in Zelle A1 dann die „1“ steht würde ich wie folgt vorgehen, jedoch habe ich den Code jetzt auf die Schnelle mit dem Makrorecorder aufgezeichnet. Da gibt es mit Sicherheit eine einfachere Möglichkeit…
Range(„B1“).Select
ActiveCell.FormulaR1C1 = „=RC[-1]+1“
Range(„B1“).Select
Selection.Copy
Range(„A1“).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range(„B1“).Select
Application.CutCopyMode = False
Selection.ClearContents
Range(„A1“).Select
ExecuteExcel4Macro „PRINT(1,1,2,TRUE,FALSE)“
Hallo Vielen dank für die Antwort.
Ja ich habe mir auch einen Druckbutton gedacht.
Nur leider kann ich nichts mit deiner Beschreibung anfangen, denn ich weiß überhaubt nix.
Vielleicht könnten Sie mir eine Schritt für Schritt erklärung geben???
Meine Zahl die hochgezählt wird steht in Zelle „E2“
Vielen Dank
Tut mir leid, keine Ahnung,sorry Piggi