Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
528to532
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
528to532
528to532
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhalte von Zellen anzeigen
07.12.2004 16:27:30
Zellen
Hallo,
vielleicht kann mir jemand folgende Frage beantworten:
Ich habe in der Zelle z.B. F25 einen Wert eigetragen. In der Tabelle weiter unten (zB Zelle F635 bis F750)sammle ich jetzt verschiede Informationen. Zum einen kann der Wert der Zellen F635 bis F750 aus einer Verknüpfung zB Zelle =F25 stammen zum anderen aus einer eingebenen Zahl zB 1.000,00 oder eine Verknüpfung mit einer Access Datenbank. In den Zellen F630 bis F750 stehen sichtbar nur Zahlen.
Jetzt kommt meine Frage:
Um einen schnelleren Überblick zu bekommen, woher die Werte kommen, benötige ich in einer separaten Spalte die Inhalte der Zellen F635 bis F750.
Da die Tabelle aber lebt und weitere Zellen hinzukommen, ist meine persönlich Lösung kopieren der Zellen und vor das = das Zeichen 'setzen nicht möglich.
Vielleicht kann mir jemand helfen, das Problem zu lösen.
Im voraus schon mal Vielen Dank.
Marc

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Inhalte von Zellen anzeigen
Zellen
hallo Marc,
evtl. bringt Dich die Funktion Hyperlink weiter.
gruss thomas
AW: Inhalte von Zellen anzeigen
07.12.2004 17:08:57
Zellen
Hallo Thomas,
Danke für deinen Hinweis, aber dann springe ich doch nur in die Zelle.
Gruß Marc
AW: Inhalte von Zellen anzeigen
Zellen
hi Marc,
dann habe ich Dich wohl missverstanden. meine idee, wenn Du zur zelle springst siehst Du doch was drinsteht.
gruss thomas
AW: Inhalte von Zellen anzeigen
Zellen


      
hallo marc
oder vieleicht hilft dir das hier:
einfach dein blatt aktivieren und über einen button oderso die sub deut starten.
Option Explicit
Dim ac As Range
Dim t As String
Dim s As String
Dim zelle As Range
Public Sub deut()
Set ac = ActiveCell
weg
On Error GoTo fehler
s = vbLf
For Each zelle In ActiveSheet.Cells.SpecialCells(xlCellTypeFormulas) 'formeln finden
      t = zelle.Address & "        " & zelle.FormulaLocal & vbLf & _
      "Ergebniss:" & " =" & zelle.Text
      s = s & t & vbLf
Next
ActiveSheet.OLEObjects.Add(ClassType:="Forms.TextBox.1", _
      Left:=ActiveCell.Left, _
      Top:=ActiveCell.Top + ActiveCell.Height, _
      Width:=0, _
      Height:=0) _
.Name = "FormelText"
With ActiveSheet.OLEObjects("FormelText").Object
      .Font.Size = 8
      .Text = s
      .AutoSize = 
True
      .MultiLine = 
True
End With
ac.Activate
s = ""
Exit Sub
fehler:
MsgBox prompt:="Im aktiven Blatt " & Chr(10) & _
                                 "keine Zellen mit Formeln gefunden .", _
Title:="Fehlermeldung"
End Sub
Public Sub weg()
On Error Resume Next
ActiveSheet.OLEObjects("FormelText").Delete
End Sub
ransi 


Anzeige
AW: Inhalte von Zellen anzeigen
Zellen
hallo marc
als ansatz versuch mal so:
wenn die hilfsspalte in G635:G750 liegt:
Public

Sub t()
Dim zelle As Range
For Each zelle In Range("G635:G750")
zelle.Value = "'" & zelle.Offset(0, -1).FormulaLocal
Next
End Sub

ransi

326 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige