|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
 zum heutigen Datum springen, markieren, einfügen |
02.03.2017 11:37:02 |
-EGN- |
|
|
|
05.03.2017 11:28:33 |
fedjo |
|
|
|
06.03.2017 08:21:51 |
-EGN- |
|
|
|
06.03.2017 08:22:41 |
-EGN- |
|
|
Von:
-EGN- |
Datum:
02.03.2017 11:37:02 |
Views:
1316 |
Rating:
|
Antwort:
|
Thema:
zum heutigen Datum springen, markieren, einfügen |
|
Hallo liebe Excel Freunde,
leider kann ich den Beitrag nicht im richtigen Unterforum verfassen, da derzeit Wartungsarbeiten stattfinden.
Ich hoffe, ihr könnt mir hier helfen.
In der Zelle A1 habe ich die Formel "zu heute" drin. Diese funktioniert soweit wunderbar.
Mein Makro soll auf "zu heute" klicken und dadurch auf das aktuelle Datum springen. Dieses soll er mit den 28 neben liegenden Zeilen markieren, kopieren und nur wertemäßig einfügen.
Auf das "zu heute" kann verzichtet werden, Hauptsache er springt auf das aktuelle Datum und macht dann wie oben beschrieben weiter.
Mein Code sieht folgendermaßen aus:
Sub Makro1()
'
' Makro1 Makro
'
'
Sheets("Daten").Select
Range("A1").Select
Application.Goto Reference:="R6C1"
With ActiveCell
Range(.Offset(0, 0), .Offset(0, 28)).Select
End With
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("Gemba").Select
Application.CutCopyMode = False
ActiveWorkbook.Save
End Sub
Ich vermute, es liegt auch an diesem "R6C1"
vielen lieben Dank
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
zum heutigen Datum springen, markieren, einfügen |
02.03.2017 11:37:02 |
-EGN- |
|
|
|
05.03.2017 11:28:33 |
fedjo |
|
|
|
06.03.2017 08:21:51 |
-EGN- |
|
|
|
06.03.2017 08:22:41 |
-EGN- |
|
|