1-Klick-Tausch der Formatierung

02/09/2009 - 13:18 von Groej Neweol | Report spam
Hallo,

kann man in Excel (2003) die Formatierung zweier markierter Zellen
gegeneinander austauschen?

Grüße
Groej
 

Lesen sie die antworten

#1 Claus Busch
02/09/2009 - 14:33 | Warnen spam
Hallo Joerg,

"Groej Neweol" schrieb:

kann man in Excel (2003) die Formatierung zweier markierter Zellen
gegeneinander austauschen?



für das Tauschen mit Rechtsklick probier es mal so im Codemodul des
entsprechenden Tabellenblattes:
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As
Boolean)

Dim Format1 As String
Dim Format2 As String

If Selection.Cells.Count > 2 Then
MsgBox "Bitte nur 2 Zellen markieren"
Exit Sub
Else
Format1 = Selection.Cells(1).NumberFormat
Format2 = Selection.Cells(2).NumberFormat
Selection.Cells(1).NumberFormat = Format2
Selection.Cells(2).NumberFormat = Format1
End If
Cancel = True

End Sub


Mit freundlichen Grüssen
Claus Busch
@Web-Interface

Windows XP SP2; Vista Ultimate
Office 2000 SP3; Office2007 Ultimate

Ähnliche fragen