Absolute in relative Zellbezüge umwandeln und umgekehrt

 

Die folgenden Makros wandeln vorhandene Zellbezüge in absolute bzw. relative Bezüge um. Zur Umwandlung von relativen Zellbezüge in absolute Bezüge, kann das Makro "absolut" verwendet werden.Alle Zellbezüge eines Tabellenblattes werden damit in absolute Zellbezüge umgewandelt.

Das Makro "relativ" hingegen wandelt absolute in relative Zellbezüge um. Auf diese Weise können Sie die Bezugsart in Ihren Tabellen ganz schnell abändern. Wenn Sie nur einen bestimmten Zellbereich umwandeln möchten, dann übergeben Sie der Variable conRange einfach den entsprechenden Bereich im Format Range("A1:B20").

Option Explicit
Dim conRange As Range
Dim i%
{/codecitation}
{codecitation}
Sub absolut()
Set conRange = Selection.SpecialCells(Type:=xlFormulas)
For i = 1 To conRange.Areas.Count
conRange.Areas(i).Formula = _
Application.ConvertFormula _
(Formula:=conRange.Areas(i).Formula, _
FromReferenceStyle:=xlA1, _
ToReferenceStyle:=xlA1, ToAbsolute:=xlAbsolute)
Next
End Sub



Sub realativ()
Set conRange = Selection.SpecialCells(Type:=xlFormulas)
For i = 1 To conRange.Areas.Count
conRange.Areas(i).Formula = _
Application.ConvertFormula _
(Formula:=conRange.Areas(i).Formula, _
FromReferenceStyle:=xlA1, _
ToReferenceStyle:=xlA1, ToAbsolute:=xlRelative)
Next
End Sub


Das Makro ist zwingend in ein Modul (nicht in ein Tabellenblatt) einzufügen.

 
Weitere Informationen zu absoluten und relativen Bezügen finden Sie in diesem Beitrag.

     sitepanel e mail Anfrage per E-Mail   |   sitepanel telephone 0151 - 164 55 914   |    sitepanel formular  Anfrage per Kontaktformular      |     Excel-Hilfeforum Hilfe-Forum

Ihre Zufriedenheit ist unser Ziel, deshalb verwenden wir Cookies. Mit diesen ermöglichen wir, dass unsere Webseite zuverlässig und sicher läuft, wir die Performance im Blick behalten und Sie besser ansprechen können. Cookies werden benötigt, damit technisch alles funktioniert und Sie auch externe Inhalte lesen können. Des Weiteren sammeln wir unter anderem Daten über aufgerufene Seiten, getätigte Käufe oder geklickte Buttons, um so unser Angebot an Sie zu Verbessern. Mehr über unsere verwendeten Dienste erfahren Sie unter „Weitere Informationen“. Mit Klick auf „Akzeptieren“ erklären Sie sich mit der Verwendung dieser Dienste einverstanden. Ihre Einwilligung können Sie jederzeit mit Wirkung auf die Zukunft widerrufen oder ändern.