Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
26.04.2024 16:05:28
PivotChart-Stapeldiagramm erstellen
26.04.2024 15:34:42
Überlagernde Textbox-Ansicht
26.04.2024 15:27:20
Excel öffnet nach Auswahl einer Excel diese leer
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1636to1640
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1636to1640
1636to1640
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Satt wert den Namen einer Variablen ausgeben

Satt wert den Namen einer Variablen ausgeben
15.08.2018 08:57:57
Oms
Hallo Zusammen!
ich habe schon gesucht, bin bisher aber nicht fündig geworden.
Mein Problem ist folgendes:
Wie kann ich in eine Zelle den Namen einer Variablen oder Konstanten schreiben? Wie ich den Wert ausgeben lasse, weiß ich schon...
Hintergrund ist die unten stehende Function "display". Sie soll in einem längeren Code die _ Variable, die bei "value" eingelesen wird, ausgeben. Damit ich aber auch weiß zu welcher Variable der Wert gehört, brauche ich zusätzlich den Namen der Variable/Konstante. 

Function display(reihe As Single, spalte As String, value As Variant)
ActiveSheet.Select
Range(spalte & reihe).Select
ActiveCell.FormulaR1C1 = ####Name von value ####
ActiveCell.Offset(0, 1).value = value
End Function

Viele Grüße!
Oms

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Satt wert den Namen einer Variablen ausgeben
15.08.2018 09:46:28
ChrisL
Hi
Im vorliegenden Beispiel wäre der Name der Variable immer fix "value". Es ist mir darum unklar, was du jetzt auslesen willst (der Name ist bereits bekannt) und was der Inhalt der Variable wäre.
Du müsstest mal losgelöst von deiner Idee die eigentliche Anforderung schildern.
Übrigens würde ich eine Variable nicht "Value" nennen, weil Value ja auch in anderem Zusammenhang (Range.Value) verwendet wird und du darum Gefahr läufst, ein VBA-Schlüsselwort zu verwenden.
cu
Chris
AW: Satt wert den Namen einer Variablen ausgeben
15.08.2018 10:38:18
Oms
Hi ChrisL,
erstmal Danke fürs antworten eine mögliche Lösugn habe ich gefunden (siehe unten).
An den Namen "value" hätte ich eigentlich auch selbst denken können, Sorry.
Im Grunde habe ich ein größeres Projekt mit ein paar Subs. Um sicherzugehen, dass auch die Zwischenwerte richtig sind, bzw. später auslesen zu können, welcher Wert in einer Variable steht, lasse ich mir die Daten in ein Excel-Sheet schreiben. So kann man auch nach mehreren Durchläufen die Werte vergleichen.
Wenn ich die Funktion im Modul aufrufe, würde ich mir zum Beispiel die Drehzahl einer MAschine ausgeben lassen.
Das sähe dann so aus:
(Deklariert hab ich vieles global)
Sub xyz()
display 1,"A",Drehzahl
End Sub
D.h. ich möchte einmal den Wert in "Drehzahl" auslesen, und zusätzlich den Namen "Drehzahl" angeben lassen.
Warum ich das als Funktion mache:
es ist ein größeres Modell und um die Übersicht besser behalten zu können möchte ich die Zeilen, die diese Ausgabe braucht im Modul klein halten. In der Funktion selbst ist es eher egal.
Aktuell habe ich es so gelöst, vielleicht gibt es noch ne elegantere möglichkeit?
Function display(reihe As Single, spalte As String, value As Variant, Optional text As Variant)
ActiveSheet.Select
Range(spalte & reihe).Select
ActiveCell.FormulaR1C1 = text
ActiveCell.Offset(0, 1).value = value
End Function

Viele Grüße!
Anzeige
AW: Satt wert den Namen einer Variablen ausgeben
15.08.2018 10:41:27
Oms
Achja Value heißt jetzt Textwert ;D
AW: Satt wert den Namen einer Variablen ausgeben
15.08.2018 11:29:53
ChrisL
Hi
Die ultimative Lösung fällt mir auch nicht ein. Ich denke der von dir eingeschlagene Lösungsweg ist i.O.
So könntest du den Code noch ein wenig umschreiben...
Sub xyz()
Call display(1, "A", 1111, "xxx")
End Sub


Sub display(reihe As Single, spalte As String, value As Variant, Optional text As Variant)
With ActiveSheet
.Range(spalte & reihe) = text
.Range(spalte & reihe).Offset(0, 1) = value
End With
End Sub

' --------------------------
Sub xyz2()
Call display2(Cells(1, "A"), 2222, "xxx")
End Sub


Sub display2(rng As Range, varValue As Variant, Optional strText As String)
With rng
.value = strText
.Offset(0, 1) = varValue
End With
End Sub
cu
Chris
Anzeige
AW: Satt wert den Namen einer Variablen ausgeben
15.08.2018 16:21:04
Oms
AK, Danke!

305 Forumthreads zu ähnlichen Themen

Spaltentrennzeichen nach speichern in Text-Datei
Michael

Hallo
ich habe ein Problem. Vielleicht ist es schwierig, vielleicht aber auch nicht.
Ich habe eine Text-Datei mit Spaltentrennzeichen "|" (besser als ";" der Übersichtlichtlichkeit halber) und verschiedenen Längen der Spalten.
Ich will diese in Excel überarbeiten und als Text-Dat...
11.09.2008 09:28:00
Thread-ID: 1008978
3 Beiträge
Anzeige
Textbox: nur 2Stellen nach Komma
WolfgangN

Hallo,
Ich habe eine Textbox in einem Userform, in dieser Textbox möchte ich schon während der Eingabe verhindern, dass der User nach dem Komma mehr als 2 Ziffern eingeben kann. Also ab der 3.Ziffer soll nichts mehr passieren. Vor dem Komma ist die Anzahl egal. Im Archiv habe ich schon eini...
08.02.2009 12:49:00
Thread-ID: 1048271
5 Beiträge
Macro gesucht Text teilen ab Zeichen "-"
Tom

Liebes Forum,
ich suche ein Macro welches mir alle Zeichen links vom "-" (Minus) in eine neue Spalte B und alle Zeichen rechts vom Minus in die neue Spalte C kopiert. Das "-" (Minus) kann ggf. öfter vor kommen, ich möchte es nur auf das erste von links beziehen.
Konkret
Textxyz 79.x...
06.07.2009 12:18:48
Thread-ID: 1086596
2 Beiträge
Anzeige
text auslesen in excel tabellenblatt
Michael

Public Sub aufruf() Dim IE Dim Quelltext As String Set IE = CreateObject("internetexplorer.application") IE.navigate "http://www.spotlight.de/" Quelltext = IE.Document.documentElement.outerHTML MsgBox Quelltext IE.Quit End Sub Hallo!
Der text soll im Tabellenblatt 1 als Text ausgebeben w...
04.09.2009 18:23:41
Thread-ID: 1100679
4 Beiträge
Nur bis zu einem Bestimmten Zeichen kopieren
Excellent

Hallo,
ich habe z.B. in einer Zelle in Excel diesen Dateipfad stehen: C:\Ordner1\UnterordnerXY\Ordner0815
Nun möchte ich, wenn ich auf einen Button drücke nur noch folgendes in der Zelle stehen haben:
C:\Ordner1\UnterordnerXY\
Es könnte auch sein, dass der Pfad lediglich so auss...
24.09.2009 11:29:13
Thread-ID: 1105207
8 Beiträge
ausschneiden ab bestimmten zeichen
walter

Hallo an Alle,
ich moechte aus bestehenden Datensätzen alle Zeichen auslesen, die nach dem Gleichheitszeichen (in jedem DSatz enthalten) enthalten sind. Aber Achtung, unterschiedliche Längen.
Danke + Gruß
Walter
12.10.2009 12:31:09
Thread-ID: 1109049
2 Beiträge
ausschneiden ab bestimmten zeichen
walter

Hallo an Alle,
ich moechte aus bestehenden Datensätzen alle Zeichen auslesen, die nach dem Gleichheitszeichen (in jedem DSatz enthalten) enthalten sind. Aber Achtung, unterschiedliche Längen.
Danke + Gruß
Walter
12.10.2009 12:32:03
Thread-ID: 1109050
2 Beiträge
ausschneiden ab bestimmten zeichen
walter

Hallo an Alle,
ich moechte aus bestehenden Datensätzen alle Zeichen auslesen, die nach dem Gleichheitszeichen (in jedem DSatz enthalten) enthalten sind. Aber Achtung, unterschiedliche Längen.
Danke + Gruß
Walter
12.10.2009 12:36:34
Thread-ID: 1109051
5 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
6
4
1
8
3
7
1
1
4
3
2
2
2
1
2
8
13
1
4
3
1
5
2
4