Office: (Office 2007) absolute Zellbezüge für mehrere Zellen

Moinsen,

ist es möglich, dass man mehrere Zellen, die zur Zeit noch relative Zellbezüge beinhalten, komplett umstellt auf absolute Zellenbezüge ?
Im Moment muß ich noch in jede Zelle doppleklicken und Strg.+T drücken.
Da es um mehr als 200 Zellen geht, wäre ich für Hilfe dankbar.

Grüße Michael

:)

 

Hallo, Michael,

Bereich markieren und Makro starten:

Option Explicit

Sub FormelbezügeWandeln()

Dim rngZelle As Range

For Each rngZelle In Selection.SpecialCells(xlCellTypeFormulas)
rngZelle.Formula = Application.ConvertFormula(rngZelle.Formula, _
xlA1, , xlAbsolute, rngZelle)
Next rngZelle

End Sub

Gruß,
LS

 

Hallo LS,

super danke. Leider gibt's bei mir die Meldung:
"Fehler beim Kompilieren:
Syntaxfehler"

Leider hab ich keinen Schimmer von Makros. Ich hab einfach alles eingesetzt:
>
Option Explicit

Sub FormelbezügeWandeln()

Dim rngZelle As Range

For Each rngZelle In Selection.SpecialCells(xlCellTypeFormulas)
rngZelle.Formula = Application.ConvertFormula(rngZelle.Formula, _
xlA1, , xlAbsolute, rngZelle)
Next rngZelle

End Sub
<

Muß ich da noch was ergänzen ?

Grüße Michael

 

Hallo, Michael,

siehe Beispielmappe. Bei mir funktioniert es ohne Probleme *confused.gif*

Gruß
LS

 

Hallo LS,

Super, ganz dickes Danke.
Ich hab's noch mal aus dem enthaltenen Makro kopiert und eingesetzt. Und es geht. Bingo, super. Danke. Ich wär sonst wahnsinnig geworden.

Grüße Michael

 

Auch nach knapp 8 Jahren von mir herzlichen Dank für den Code.
Gruß Gerd

 

Auch herzlichen Dank von mir. "Drück mich" Icon habe ich einfach in meine Excel-Datei kopiert und mir damit tierisch viel Zeit erspart!

Herzlicher Gruß

Michael

 

Hallo Lumpensammler ;-))

gibt es eine einfache Möglichkeit deinen Code auf eine Symbolleist zulegen?

Vielen Dank

 

Hallo freiminute,

du kannst das Makro in die Symbolleiste für den Schnellzugriff packen: