Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.10.2025 19:34:56
Eine Zelle in 3 Spalten teilen
20.10.2025 19:24:08
Excel Form befüllen
20.10.2025 19:03:51
wenn istleer funktioniert nicht wegen formel
20.10.2025 13:56:55
Wenn Funktion mit Xverweis oder ähnlich
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
844to848
844to848
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

fixieren der Zellen

Forumthread: fixieren der Zellen

fixieren der Zellen
19.02.2007 13:43:00
Vossi
Hallo!
Ich würde gerne wissen, ob es möglich ist, alle Zellen, die in einer Formel verwendet werden automatisch mit $-Zeichen zu versehen, damit sie fixiert sind.
Also eine Zelle, deren Inhalt beispielsweise =E2+D2 ist, soll zu =$E$2+$D$2 werden.
Ich freue mich über Eure Hilfe!
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: fixieren der Zellen
19.02.2007 15:07:00
Hubert
Hi,
das geht nur mit VBA, sieh dir dazu in der VBA-Hilfe: Application.ConvertFormula an.
mfg Hubert
AW: fixieren der Zellen
19.02.2007 15:08:41
Frank
Hallo Namenloser,
hab im Netz oder sogar hier ein Add in gefunden mit dem kannst Du die Bezüge übers Kontext anpassen.
Coole Geschichte also Add in einbinden Excel neustarten und dann sollte es übers Kontext funktionieren.
Add in hängt unten dran, erst mal auf der Platte speichern
Gruß Frank
https://www.herber.de/bbs/user/40539.xla
Anzeige
AW: fixieren der Zellen
20.02.2007 08:32:00
Vossi
Super! Vielen Dank!
Dieses Add-In ist genau das, was ich gesucht habe.
AW: fixieren der Zellen
19.02.2007 15:18:00
Walburga
Hi Vossi
vielleicht hilft Dir dies:

Sub RelativZuAbsolut()
Dim rngF As Range
On Error Resume Next
For Each rngF In ActiveSheet.Cells.SpecialCells(xlCellTypeFormulas)
rngF.Formula = Application.ConvertFormula(rngF.Formula, xlA1, xlA1, xlAbsolute)
Next rngF
End Sub

und wieder zurück das Ganze:

Sub AbsolutZuRelativ()
Dim rngF As Range
On Error Resume Next
For Each rngF In ActiveSheet.Cells.SpecialCells(xlCellTypeFormulas)
rngF.Formula = Application.ConvertFormula(rngF.Formula, xlA1, xlA1, xlRelative)
Next rngF
End Sub

eine lieben Gruss
Walburga
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige