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

Makroausführung durch Klick auf Combobox /O-Btn

Forumthread: Makroausführung durch Klick auf Combobox /O-Btn

Makroausführung durch Klick auf Combobox /O-Btn
24.06.2004 08:59:05
Matthias
Hallo,
ich habe ein seltsames Problem, welches ich nicht selbst lösen kann.
Und zwar habe ich einige Makros die beim Direktaufruf gut funktionieren.
Nun wollte ich dies durch einen Optionbutton bzw. eine Combobox aufrufen lassen.
z.B.

Private Sub OptionButton1_Click()
Call Formeln_Bestände
End Sub

In diesem Fall werden Fehler angezeigt.
Z.B. bei Range("C2:C50000").ClearContents
Wie kann ich diese Fehler verhindern?
Danke.
Matthias
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makroausführung durch Klick auf Combobox /O-Btn
Uduuh
Hallo,
für eine qualifizierte Aussage braucht man schon ein bischen mehr Code. Ich vermute aber, dass der OB den Focus hat und nicht die Tabelle. Da ein OB keinen Range hat, gibt's halt den Fehler. Ausnahmsweise brauchst du wohl doch ein Select. (Sheets(1).cells(1,1).select)
Gruß aus'm Pott
Udo
http://www.excelerator.de
Anzeige

Forumthreads zu verwandten Themen

TextBox1.Value = TextBox2.Value + TextBox3.Value
Michaela

Guten Mittag
Stehe ich aufm schlauch?
ich versuche in TextBox1. die Summe aus TextBox 2 und 3 anzuzeigen. das geht aber nicht mit:
TextBox1.Value = TextBox2.Value + TextBox3.Value
was mache ich falsch?
Danke für die Hilfe
Michaela
18.08.2008 13:45:00
Thread-ID: 1002572
9 Beiträge
Anzeige
ComboBox 1 = ComboBox 2
mtremer

Hallo Excel-Freunde,
wie kann man die 2. ComboBox so programmieren, dass sie anfangs die gleichen Auswal wie die 1. Combobox anzeigt?
Wenn also die 1. "a" zeigt, soll die 2. auch "a" zeigen.
Die 2. soll aber auch weiterhin einstellbar sein. Man soll auch in der 2. "b" auswählen kön...
09.10.2008 14:33:00
Thread-ID: 1015355
5 Beiträge
Anzeige
combobox füllen durch textbox
kirsche

hallo leute,
ich stehe mal wieder vor einem problem und hoffe auf eure hilfe.
ich habe eine tabelle(artikelstamm) mit ca. 2000 einträgen. in spalte L steht die PLU, welche bei einigen artikeln gleich ist. außerdem habe ich eine userform mit einer textbox und combobox.
in die textb...
17.11.2008 13:46:00
Thread-ID: 1025207
6 Beiträge
checkboxen durchzählen: Syntax?
Jörg

Guten Abend oder guten Morgen...
simples Problem - ich weiß nur nicht, wie man das schreibt...
man kann doch alles mögliche durchzählen - Beispiel:
for i = 2 to 5
if irgendwas then range("Zelle" & i).irgendwas
wie geht denn das bei Checkboxen?
wenn ich z.B. schreibe...
18.03.2009 00:58:30
Thread-ID: 1061245
5 Beiträge
Checkboxen durchzählen
Jörg

Guten Abend, Gemeinde
mein Problem von vor einigen Tagen ist noch ungelöst - hab die Beispieldatei noch etwas modifiziert
https://www.herber.de/bbs/user/60530.xls
Es geht "ganz einfach" um die Frage, wie ich für eine For-next-Schleife, an der mehrere Checkboxen beteiligt sind, den...
20.03.2009 22:12:51
Thread-ID: 1062387
9 Beiträge
Wert aus Zelle x in Zelle y, wenn Zelle Y =1
Wolfgang

Liebe Profis
In folgender Prozedur
Private Sub CommandButton1_Click() Range("A23:A37").Select Selection.TextToColumns Destination:=Range("A23"), DataType:=xlDelimited, _ TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _ Semicolon:=False, Comma:=False, Space:=Fal...
08.05.2009 11:11:52
Thread-ID: 1073830
3 Beiträge
Werte von Zelle x übernehmen, wenn Zellwert=1
Zelle

Liebe Profis
In folgender Prozedur
Private Sub CommandButton1_Click() Range("A23:A37").Select Selection.TextToColumns Destination:=Range("A23"), DataType:=xlDelimited, _ TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _ Semicolon:=False, Comma:=False, Space:=Fal...
11.05.2009 15:53:03
Thread-ID: 1074391
4 Beiträge
Anzeige
Excel Formel durch eigene Ergänzen ?
Hafner

Hallo
Ist es möglich, bei dem fixen Formeln unter Mathematikformeln eine eigene Formel zu speichern
es geht um diese Formel =@Ganzzahl(20*........+0.5)/20
ich benötige diese immer wieder und es ist Mühsam, diese jedesmal neu zu schreiben
23.05.2009 13:56:13
Thread-ID: 1076845
13 Beiträge
Anzeige
.find -> Suche erst nach x Durchläufen erfogreich
Suppenhuhn

Hallo Gemeinde !
Angehängte Makro-Routinen habe ich geschrieben um aus einer sehr, sehr langen Excel-Tapete die Zeilenpaare in ein neues Blatt auszusortieren, die in Spalte 13 bzw. 14 den gleichen Eintrag haben und deren Summe der Beträge in Spalte 17 gleich NULL sind.
Das Problem ist,...
24.05.2009 09:14:17
Thread-ID: 1076910
13 Beiträge
range("A1")= strText
Michael

Option Explicit
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Public Sub URL_Load() Dim myIE_App As Object, strText As String Set myIE_App = CreateObject("InternetExplorer.Application") myIE_App.Navigate "http://www.kicker.de" Do Sleep 10 Loop Until myIE_App.B...
05.09.2009 16:16:24
Thread-ID: 1100785
2 Beiträge
Textbox1=Textbox2 wie?
Sascha


einen schönen guten abend...
kurze frage :)
wert einer textbox1 in eine andere textbox2 gleichzeitig übernehmen?
mit: TextBox4 = TextBox1?
lieben gruß
sascha
15.09.2009 17:42:27
Thread-ID: 1103029
3 Beiträge
Cells(Rows.Count, NewFilSpa + 7).End(xlUp) = 100
Hugo

Hallo
Cells(Rows.Count, NewFilSpa + 7).End(xlUp) = 100
Wie ereiche ich, dass der Wert 100 nicht in der letzten beschriebenen Zelle (wie Code oben)
sondern eine Zeile darunter eingefügt wird?
Besten Dank für eure Hilfe und Gruss
Hugo
13.12.2009 22:40:21
Thread-ID: 1123643
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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