Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
784to788
784to788
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Button bei Klick in anderem Userform ausblenden

Forumthread: Button bei Klick in anderem Userform ausblenden

Button bei Klick in anderem Userform ausblenden
29.07.2006 16:22:56
sascha
Hallo,
noch ein weiteres Problem vom mir. Per Button öffnet sich ein userform, dass Projektdaten abfragt und über einen anderen Button diese Daten in die Tabellen schreibt und dann die komplette Mappe 2-mal kopiert.
Ich möchte nun, dass beim kopieren der Mappe der eine Button, der die Abfrage der Daten aufruft nihct mehr im der kopierten Mappe befindet. Der Button muss nicht ganz gelöscht sein, es reicht wenn er versteckt oder nicht anwählbar ist.
ich habe schon mit
ActiveWorkbook.erzeugenbutton1.Visible
herumgespielt, es kommt aber immer wieder der Laufzeitfehler.
gruß sascha
Anzeige

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Button bei Klick in anderem Userform ausblenden
29.07.2006 18:31:20
Herbert
hallo Sascha,
du mußt in erster Linie das Blatt angeben...


Sub cb_ein_ausblenden()
Dim prüfen
With Sheets("xy")
        With .erzeugenbutton1
             prüfen = IIf(.Visible = True, False, True)
            .Visible = prüfen
        End With
End With
End Sub

     gruß Herbert
Anzeige
AW: Button bei Klick in anderem Userform ausblenden
29.07.2006 19:10:21
Sascha
Hallo Herbert,
der Button, den ich löschen will, befindet sich aber nicht in einem Sheet sondern in einem Userform/Formular. das hat doch dann gar nichts mit dem Blatt zu tun oder sehe ich das falsch?
gruß sascha
AW: Button bei Klick in anderem Userform ausblenden
29.07.2006 19:16:37
Herbert
dann mußt du den Namen der Userform oder "Me" anführen...
Me.erzeugenButton1.Visible = False
gruß Herbert
Anzeige
AW: Button bei Klick in anderem Userform ausblenden
29.07.2006 19:49:54
sascha
Hallo Herbert,
mit abfrage.erzeugenButton1.Visible = False geht es leider nicht, es kommt auch keine Fehlermeldung.
mit abfrage.erzeugenButton1.Delete kommt ne Meldung "Methode oder datenobjekt nicht gefunden"
noch eine Idee?
gruß sascha
AW: Button bei Klick in anderem Userform ausblenden
29.07.2006 19:16:20
Kurt
"Ich möchte nun, dass beim kopieren der Mappe der eine Button, der die Abfrage der Daten aufruft nihct mehr im der kopierten Mappe befindet."
Das geht nur bei Controls, die zur Laufzeit erzeugt werden. Das wird bei dir nicht der Fall sein, oder?
Werden die kopierten Mappen unter neuen Namen gespeichert?
mfg Kurt
Anzeige
AW: Button bei Klick in anderem Userform ausblenden
29.07.2006 19:54:38
sascha
Hallo kurt,
so fir bin ich in VBA nicht weis gar nicht so richtig was Controls sind, sage mal dass das bei mir nicht der Fall ist.
die Datei wird unter einem neuen Namen gespeichert. Hier mein Code (Button ist abber immernoch nicht weg):
Dim ordnername1 As String
ordnername1 = ThisWorkbook.Path
ordnername1 = Left(ordnername1, Len(ordnername1) - Len(Dir(ordnername1, vbDirectory)) - 1) & "\" & TextBox2.Value
If Dir(ordnername1, vbDirectory) = "" Then MkDir ordnername1
On Error Resume Next
abfrage.erzeugenButton1.Visible = False
ThisWorkbook.SaveCopyAs ordnername1 & "\" & TextBox5.Value & "_Liste_" & Format(Date, "yyyymmdd") & ".xls"
abfrage.erzeugenButton1.Visible = False
gruß sascha
Anzeige
AW: Button bei Klick in anderem Userform ausblenden
29.07.2006 20:22:06
Kurt
Hi,
Controls sind Steuerelemente, wie Commandbutton.
Stell die Eigenschaft Visible des fraglichen Button in den Eigenschaften auf False.
In das Modul der Userform diesen Code:

Private Sub UserForm_Initialize()
If ThisWorkbook.Name = "Original.xls" Then CommandButton1.Visible = True
End Sub

Wobei Original.xls der Name deiner Datei ist. Wenn du die Datei unter anderem Namen speicherst, wird der Button nicht mehr angezeigt.
mfg Kurt
Anzeige
@ Kurt Besten Dank es funktioniert
29.07.2006 21:19:31
Sascha
genau so wollte ich es.
Die Lösung ist ja eigentlich extrem simpel, aber darauf wäre ich nie gekommen, ich habs immer komplizierter gesucht.
Danke gruß Sascha
AW: @ Kurt Besten Dank es funktioniert
29.07.2006 21:40:16
Kurt
The best things of life are the simple things.
mfg Kurt
;

Forumthreads zu verwandten Themen

In derTextBox das Format ändern
edie

Hallo zusammen,
würde gerne, wenn es möglich wäre, das Datum in der TextBox im Format TT.MM.YYYY
zurückschreibe in die Zelle A1 im Format YYYY-MM-TT 00:00 z. B. 2008-07-01 00:00
Wenn es möglich ist dann wie?
Hat jemand eine Idee und kann weiter helfen?
Danke im Voraus.
...
13.08.2008 15:27:49
Thread-ID: 1001560
3 Beiträge
Fehler in der Formel
Baywatch

Hi
ich habe eine Formel und die tut es leider nicht. Wenn ich MIN durch Max ersetze klappt es, aber warum bei min NIcht?
Vielleicht findet jemand den Denkfehler?
{=(BEREICH.VERSCHIEBEN(Daten!$A$1;SUMME(WENN(Daten!D1:D5002=MIN(WENN(Daten!F1:F5002="M"; Daten!D1:D5002;0));ZEILE(Date...
15.08.2008 15:59:00
Thread-ID: 1002235
8 Beiträge
Datum in der Userform formatieren
Nadine

Hallo,
ich habe im VBA eine Userform erstellt. In einem der Textfelder soll ein Datum stehen.
Wenn Buchstaben in dieser Textbox stehen, soll keine Übertrabung in die -von mir vorgesehen- Excelzelle erfolgen.
Bitte um HILFE!!!
Vielen Dank
Nadine
18.08.2008 16:17:00
Thread-ID: 1002660
7 Beiträge
Anzeige
Bearbeiten/Formatieren der x-Achse in Diagramm
Mayr,

Hallo zusammen,
ich hab ein Problem beim Formatieren der X-Achse in meinem Diagramm...
Und zwar soll es eine Zeitachse sein und um 4 Uhr anfangen und um 4 Uhr enden.... also nicht von 0-24Uhr.
Das stellt aber jetzt für mich ein Problem dar, da ich wnicht weiß wie ich excel sag das e...
15.10.2008 14:03:00
Thread-ID: 1016558
2 Beiträge
Formel - Anzeige der gefilterten Inhalte
Rocky

Hallo Excelfreunde und zweiäugigen unter den Blinden und Einäugigen,
ich möchte gern einen dynamischen "Querfilter" basteln. Mein Ansatz bisher: Ich kopieren die Tabelle und transportiere diese. dann wird in jede Zelle folgende Formel geschrieben:
=WENN(INDIREKT(ADRESSE(SPALTE()+0;ZEILE...
28.11.2008 08:53:12
Thread-ID: 1028554
4 Beiträge
Fehler in der Verkettung der Formel ?
Selma

Hallo Leute,
ich habe in Spalte E und F mit Formeln die Zelleninhalte verkettet. Mit einem Makro markiere ich ab Zeile 3 die Zellen in Spalte E und F und erzeugte eine Datei move.bat die danach ausgeführt wird.
In Spalte E stehen die Ordnername die erstellt werden und in Spalte F die D...
21.12.2008 13:20:00
Thread-ID: 1034590
2 Beiträge
Anzeige
Inhalt einer Zelle in anderer Zelle als Formel
Elias

Guten Morgen,
ich bin auf der Suche nach einer Lösung für folgenden Sachverhalt.
In einer Tabelle wird aus dem Inhalt verschiedener Zellen über Verketten eine Zeichenfolge gebildet, die in einer anderen Tabelle als Formel herhalten soll.
(Kurzes) Beispiel, das Original ist furchtbar...
11.01.2009 06:01:22
Thread-ID: 1038572
6 Beiträge
Anzeige
Per Userform oder Inputbox Daten selektieren
Bernd


Hallo Freaks,
ich habe im Archiv gesucht, aber leider nichts gefunden.
Ich suche ein Makro, in das ich per Userform (oder Inputbox?) einen Begriff (Namen) eingebe, dann VBA in das Tabellenblatt 1 geht, in Spalte G den Suchbegriff (Namen) sucht und dann als Ergebnis der Suche die...
05.02.2009 16:36:55
Thread-ID: 1047421
6 Beiträge
Per Userform oder Inputbox Daten selektieren
Bernd


Hallo Freaks,
ich habe im Archiv gesucht, aber leider nichts gefunden.
Ich suche ein Makro, in das ich per Userform (oder Inputbox?) einen Begriff (Namen) eingebe, dann VBA in das Tabellenblatt 1 geht, in Spalte G den Suchbegriff (Namen) sucht und dann als Ergebnis der Suche die...
05.02.2009 17:06:43
Thread-ID: 1047434
3 Beiträge
mehrzeilige Eingabe in Inputbox oder UserForm
Jakob

Hallo,
ich stehe vor folgenden Problem und suche eine Lösung.
Ich habe die Zellen C19-I25 miteinnander verbunden. Nun möchte ich aus einer SAP-Anwendung einen mehrzeiligen Text kopieren (Strg+c). Wenn ich direkt die oben genannten Zellen anklicke und dort mit Strg+v versuche den Text ei...
18.02.2009 14:34:00
Thread-ID: 1051819
5 Beiträge
untereinanderstehende Werte via VBA umformatieren
Harry

Hallo zusammen,
ich habe folgendes Problem, das ich gerne mit VBA lösen möchte:
Und zwar habe ich eine Tabelle, in der untereinander in verschiedenen Spalten Werte stehen, die ich auf einem weiteren Tabellenblatt hintereinander ausgeben möchte.
Ich benötige dazu ein Makro, das bspw....
30.03.2009 19:56:28
Thread-ID: 1065412
5 Beiträge
Anzeige
Bilder einfügen ander Tabelle Formel Reaktion
Karel

Hallo Exelianer,
Habe untestehende Code zum bilder einfügen von Hajo's Seite.
meine Frage:
- wie kan ich Bilder einfugen wobei die Bildernamen in ein andere tabelle liegen (Tabelle1) bereich A8:A100
- bildname komen in Zelle Set RaBereich = Range("A10,C10,E10,G10") Tabelle (bild...
11.06.2009 20:52:07
Thread-ID: 1080841
8 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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