| VBA-Beispiel 117 | |
|
|
Bezugsart - Spaltenbeschriftung wechseln |
|
|
Beim Programmieren wechsel ich öfter mal die Spaltenbeschriftung Buchstaben/Zahlen. Dabei ist der Mausweg über Extras/Optionen/Register Allgemein und Z1S1-Bezugsart ziemlich lang und umständlich. Stattdessen packt man sich besser dieses Makro in die persönliche Arbeitsmappe (PERONL.XLS) und weist ihm über Extras-Makro-Makros-Optionen eine Tastenkombination zu (z.B.: Strg + m). |
|
|
Public Sub Spaltenbeschriftung() 'Spaltenbeschriftung wechseln 'über Tastatur: Strg + m With Application 'wenn Buchstaben dann Zahlen If .ReferenceStyle = xlA1 Then .ReferenceStyle = xlR1C1 Else 'sonst Buchstaben .ReferenceStyle = xlA1 End If End With End Sub |
|
|
Download: vba117.zip |
|
relevante Links:
|
|
| |