Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1948to1952
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
Inhaltsverzeichnis

Schneller Zugriff auf Standard-Befehl

Schneller Zugriff auf Standard-Befehl
10.10.2023 09:59:12
Pampel
Hallo zusammen,

ich brauche in meinen Exceltabellen bei Erweiterungen sehr(!) oft den Befehl "Format übertragen". Dazu muss ich entweder mit der Maus auf den Befehl fahren (und wieder zurück) oder die Tasten Alt R F O hintereinander drücken. Beides kostet in der Summe am Tag viel Zeit.

Ich habe schon Makros aufgenommen, die mit der Auswahl des Befehls "Format übertragen" angefangen haben. Aber das Makro funktioniert nicht mehr, wenn ich z.B. den Range-Ausdruck oder andere Elemente aus dem Makro entferne.

Kann ich dem Befehl "Format übertragen" trotzdem "irgendwie" über ein Makro starten und dem Makro dann eine Tastenkombination (z.B. Strg + Ä) zuweisen?

Danke für Hinweise.


Gruß
Stefan

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

Betreff
Datum
Anwender
Anzeige
AW: Schneller Zugriff auf Standard-Befehl
10.10.2023 10:04:37
Yal
Hallo Stefan,

um nachträglich eine Tastenkombi zu einem Makro zuordnen, musst Du auf dem Excelblatt den Makro-Auswahl mit Alt+F8 aufrufen, das Makro selektieren (einfach klicken, nicht doppelt), dann auf "Option..." gehen und eine "ä" (nicht "Ä", weil sonst wäre es Shift+Strg+ä) eintragen.

VG
Yal
AW: Schneller Zugriff auf Standard-Befehl
10.10.2023 10:19:27
Pampel
Danke. Das mit dem ä/Ä wusste ich nicht
AW: Schneller Zugriff auf Standard-Befehl
10.10.2023 10:14:28
Pampel
Hallo nochmals,

ich habe gerade mit dem folgenden Makro erreicht, dass die Formatierung der Zelle, die beim Start des Makros ausgewählt war, die Zelle E7 formatiert wird.

Kann man das Makro so ändern, dass ich nach Selection.Copy die zu formatierende Zelle selbst mit der Maus festlegen kann?

Gruß
Stefan

Selection.Copy
Range("E7").Select
Selection.PasteSpecial _
Paste:=xlPasteFormats, _
Operation:=xlNone, _
SkipBlanks:=False, _
Transpose:=False
Application.CutCopyMode = False
Anzeige
AW: Schneller Zugriff auf Standard-Befehl
10.10.2023 10:25:27
Yal
Hallo Pampel,

lege den Bereich, worauf Du den Referenz-Format (Zelle E7) angewendet werden soll, also deine aktuelle Selektion, in einer Variable zur Seite:

Sub Format_übertragen()

Dim R As Range

Set R = Selection
Range("E7").Copy
R.PasteSpecial Paste:=xlPasteFormats
Application.CutCopyMode = False
End Sub


Verwende bitte beim Posten vom Code den "Code" Knopf hier oben. Poste auch abgeschlossene Sub (Also von "Sub" bis "End Sub")

VG
Yal

AW: Schneller Zugriff auf Standard-Befehl
10.10.2023 10:32:49
daniel
Hi

Vielleicht so:

Dim A as Range

Dim B as Range

Set A = selection
Set B = Application.Inputbox("Zielbereich Format", Type:=8)
A.Copy
B.pasteSpecial xlpasteformats


Grus Daniel
Anzeige
AW: Schneller Zugriff auf Standard-Befehl
10.10.2023 10:56:32
Pampel
Hallo Daniel,

vielen Dank - das erleichtert einiges


Gruß
Stefan

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige