Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 13:44:37
Datum in Excelformel anzeigen
23.04.2024 13:31:41
alle Tabellblätter als csv exportieren - Verzeichnis wählen
23.04.2024 13:19:18
Daten aus externer Datei als Bereich übernehmen... ?
23.04.2024 12:57:21
Makro für aktuell geöffn. Datei mit gleichen Namen speichern
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
676to680
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
676to680
676to680
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabellenwert in einer Userform immer aktuell

Tabellenwert in einer Userform immer aktuell
03.10.2005 19:58:21
Stefan
Hallo zusammen,
ich habe eine Tabelle mit einer Userform, welche immer im Vordergrund steht und aktuelle Werte aus verschiedenen Tabellenblättern anzeigen soll.
Nun bin ich bis jetzt soweit gekommen, das ich mit folgendem Sub den Wert einer bestimmten Zelle angezeigt bekomme:

Private Sub UserForm_Initialize()
Label2.Caption = Worksheets("07.10.2005").Range("c3").Value
End Sub

So weit so gut. Allerdings wird der Eintrag in der Userform nicht aktualisiert, wenn sich der Wert im Tabellenblatt ändert.
Was muß ich eingeben, damit die Werte in der Userform immer den aktuellen entsprechen, ohne immer die Userform neu zu starten?
Gruß und vielen Dank im voraus.
Stefan

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

Betreff
Datum
Anwender
Anzeige
AW: Tabellenwert in einer Userform immer aktuell
03.10.2005 20:05:53
Hajo_Zi
Hallo Stefan,
unter der Tabelle.
Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$C$3" Then Exit Sub
Userform1.label2.Caption = Target.Value
End Sub

Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.


AW: Tabellenwert in einer Userform immer aktuell
03.10.2005 20:49:22
Stefan
Hallo Hajo,
ein großer Schritt für einen Laien, ein kleiner für den Experten.
Alles funktioniert, aber wußtest Du bestimmt auch schon vorher.
Danke, wie immer hat das Forum bei Herber.de die Lösung schnell parat.
Eine schöne Woche und Gruß
Stefan
Anzeige
AW: Tabellenwert in einer Userform immer aktuell
03.10.2005 21:13:36
Stefan
Hallo Hajo,
da habe ich mich zu früh gefreut.
Für den ersten Wert klappt alles perfekt. Nun wollte ich den zweiten hinzufügen und hier tut sich dann gar nichts. Ich habe im Worksheet_Change einfach ergänzt: 

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$C$3" Then Exit Sub
Steuerung.Label2.Caption = Target.Value
If Target.Address <> "$C$4" Then Exit Sub
Steuerung.Label3.Caption = Target.Value
End Sub

Oder ist das schon der Fehler?
Kannst Du mir nochmal helfen? Die Daten stehen in dem Tabellenblatt unter C3:C14. Jeder einzelne Wert soll in einem Extra-Label dargestellt werden.
Gruß
Stefan
Anzeige
AW: Tabellenwert in einer Userform immer aktuell
03.10.2005 23:04:34
Luschi
Hallo Stefan,
nicht zu früh gefreut, sondern eine Vba-Sequenz, die nur für 1 Bedingung gedacht war, einfach erweitert ohne Anpassung. So geht's besser: 

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$C$3" Then
Steuerung.Label2.Caption = Target.Value
ElseIf Target.Address = "$C$4" Then
Steuerung.Label3.Caption = Target.Value
End If
'oder so:
Select Case Target.Address
Case "$C$3": Steuerung.Label2.Caption = Target.Value
Case "$C$4": Steuerung.Label3.Caption = Target.Value
End Select
End Sub

Im Deinem Fall wurde die Prozedur immer vorzeitig beendet, wenn die Zelladresse
nicht "C3" war (Exit Sub).
Da werden alle nachfolgenden Codezeilen eben nicht ausgeführt, auch wenn sie da sind.
Gruß von Luschi
aus klein-Paris
Anzeige
AW: Tabellenwert in einer Userform immer aktuell
04.10.2005 07:44:56
Stefan
Hallo Luschi,
schön, dann freue ich mich noch ein zweites Mal. Ich habe Deinen zweiten Tipp eingebaut und er funktioniert natürlich.
Ich denke, ich sollte doch mal einen Anfängerkurs in VB besuchen. ;-)
Einen schönen Tag noch.
Gruß
Stefan

301 Forumthreads zu ähnlichen Themen

Zahlen einer Tabelle in Userform einlesen
Josef

Guten Morgen!
Ich habe in einem Arbeitsblatt mehrere Tabellen.
In einer UserForm habe habe ich 460 TextBoxen, wobei die Zählung immer pro Reihe senkrecht erfolgt.
Spalte 1 = TextBox1-23, Spalte2 = TextBox24- TextBox46 usw.
Ich möchte nun z.B. die erste Tabelle in die Textboxen e...
20.08.2008 07:07:03
Thread-ID: 1003059
19 Beiträge
Anzeige
Tabelle in Spreadsheet eines Userforms
Klaus

Hallo,
ich öffne beim Starten von Excel ein Userform und möchte darin ganze Tabellen der Exceldatei darstellen (inkl. Steuerelementen und Charts). Die Tabellen sollen in das Spreadsheet kopiert werden, das sich im Userform befindet.
Wie kann das gemacht werden?
Danke für eure Hilfe,...
26.09.2008 08:11:00
Thread-ID: 1012476
4 Beiträge
Bild aus Tabelle einem Image in einer Userform zuw
Polarfuchs

Hallo Ihr Checker,
in einer Arbeitsmappe habe ich ein Tabellenblatt mit Bildern. Wie kann ich ein bestimmtes Bild, die haben die Benennungen "Vorname_Nachname", einem Image einer UserForm zuweisen? Mit "LoadPicture" habe ich es schon versucht. Da bekomme ich die Fehlermeldung "Typen unvertr...
28.09.2008 14:40:18
Thread-ID: 1012915
7 Beiträge
Anzeige
Verlauf in UserForm anzeigen
Gregor

Hallo
Ich habe im Makro folgenden Befehl, der mir in der Status-Zeile die Abarbeitung des Makros anzeigt:
Application.StatusBar = 2000 - Zeile (Zeile ist in Schlaufe eine Variable)
Wie kann ich diesen Verlauf in einer UserForm anzeigen. Diese ist zur Zeit statisch und meldet "Bitte...
18.11.2008 15:30:00
Thread-ID: 1025669
3 Beiträge
Userform Textboxen Text in Tabelle schreiben
Erich

Hallo Excelprofis,
habe ein Problem und hoffe ich könnt mir weiterhelfen.
ich habe eine Userform mit 100 Textboxen
1. ich will den inhalt der Textboxen 1 - 50 in die Tabelle Gültigkeit Spalte A 1 bis A50 eintragen den inhalt der Textboxen 51 - 100 in die Spalte B 1 bis B50
2...
18.11.2008 19:16:31
Thread-ID: 1025756
6 Beiträge
Daten von Userform ins Tabellenblett übertragen
Userform

Hi,
ich möchte mal folgendes versuchen:
Ich habe ein Tabellenblatt mit verschiedenen Datensätzen. Nun möchte ich die Datensätze nicht direkt in das Tabellenblatt schreiben, sondern über ein Formular. (Userform) . Ich stelle mir das so vor:
Auf einer Userform habe ich verschiedene Te...
26.01.2009 14:55:00
Thread-ID: 1043905
7 Beiträge
Daten von UserForm in Tabelle
UserForm

Hallo zusammen
Ich Arbeite an einem kleinen Programm, welches mir mittels einer UserForm die eingegebenen Daten in den Excel-Kalender übertragen soll.
Die UserForm habe ich schon fast komplett fertig bis auf die übertragung in den Kalender.
In der UserForm sind folgende Informatione...
24.03.2009 09:53:44
Thread-ID: 1063175
31 Beiträge
Was ist dass Es erscheinen merkwürdige Makros ???
juergen

Hallo liebe Excel Gemeinde
Bei mir passiert etwas sehr mekwürdiges.Und zwar
Öffne ich Excel mit leerem Blatt und gehe dann in die VBA Umgebung ist alles sauber.
Öffne Ich die Exceldatei von Hajo.Ziplies "nur_mit_aktivierten_makros_zeit_loeschen.xls"
Und gehe dann auf Makros...
30.03.2009 19:21:05
Thread-ID: 1065401
8 Beiträge
Anzeige

Links zu Excel-Dialogen

Label UserForm

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
18
2
3
6
2
2
5
6
30
7
7
4
2
8
2
3
6
3
3
8
3
11
3
2
8