Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1772to1776
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
1772to1776
1772to1776
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

ComboBox ListFilRange Eintrag ändern

ComboBox ListFilRange Eintrag ändern
06.08.2020 07:33:06
Hans
Hallo,
ich bräuchte ein Makro das bei allen ComboBoxen (können bis zu 32 Stück verschiedene sein) in einem Tabellenblatt den "ListFilRange" Eintrag wie folgt ändert:
'G:\1\1\Kalkulationsdaten.xls'!.....
die ….. , stehen für die verschiedenen ComboBox-Namen
Gruß Hans

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ComboBox ListFilRange Eintrag ändern
06.08.2020 22:10:10
Mullit
Hallo,
probier mal, gehe jetzt mal von ActiveX-Boxen aus: 
Option Explicit
Public Sub test()
Const STRING_REPLACEMENT As String = "'G:\1\1\Kalkulationsdaten.xls'!"
Dim objOLEObject As OLEObject
For Each objOLEObject In ActiveSheet.OLEObjects
With objOLEObject
If .progID = "Forms.ComboBox.1" Then _
.ListFillRange = Replace$(Expression:=.ListFillRange, Find:=Left$(String:=. _
ListFillRange, _
Length:=InStr(.ListFillRange, "!")), Replace:=STRING_REPLACEMENT)
End With
Next
End Sub

Gruß, Mullit
AW: ComboBox ListFilRange Eintrag ändern
06.08.2020 22:32:46
Mullit
Hallo,
gleich nochmal ne Formularvariante hinterher ;-): 
Option Explicit
Public Sub test()
Const STRING_REPLACEMENT As String = "'G:\1\1\Kalkulationsdaten.xls'!"
Dim objDropDown As Excel.DropDown
For Each objDropDown In ActiveSheet.DropDowns
With objDropDown
.ListFillRange = Replace$(Expression:=.ListFillRange, Find:=Left$(String:=. _
ListFillRange, _
Length:=InStr(.ListFillRange, "!")), Replace:=STRING_REPLACEMENT)
End With
Next
End Sub

Gruß, Mullit
Anzeige

142 Forumthreads zu ähnlichen Themen

Daten sortiert aus anderem Tabellenblatt auslesen
Robert

Hallo,
bräuchte eure Hilfe bitte.
Aus einem Tabellenblatt ("FEHLZEITEN") sollen Daten ausgelesen und in einem anderen Tabellenblatt ("EINSATZPLANUNG") ab Zeile 100 eingefügt und bei Änderungen in "FEHLZEITEN" aktualisiert werden.
Habe da mal eine Beispieldatei zur besseren Veransch...
28.08.2008 11:32:00
Thread-ID: 1005356
3 Beiträge
Anzeige
ComboBox befüllen - ListFillRange
Gordon

Moin moin,
mal eine Frage zu der Combobox. Und zwar versuche ich diese gerade über die Eigenschaftem der Box zu befüllen. Nun stehen die Daten für die Box in den Felden C4 bis F4. Wenn ich nun die Range C4:F4 im Feld ListFillRange angebe, kann man in der ComboBox nur den Eintrag von C4 a...
28.06.2009 17:35:46
Thread-ID: 1084915
18 Beiträge
ComboBox mit ListFillRange aus weiterer Exceldatei
Hans

Guten Tag,
ich habe folgendes Problem:
In einem Excel Arbeitsblatt ( [Bearbeiten.xls]Tabelle1 )möchte ich durch eine Combobox einen Datensatz vorauswählen, der dann in LinkCell [Bearbeiten.xls]Tabelle1!C3 ausgegeben wird und ich weitere Daten aus der Quelldatei hierdurch über
=SVER...
10.07.2009 13:37:29
Thread-ID: 1087675
3 Beiträge
Anzeige
Grafik laden aus anderem Tabellenblatt
Joachim

Hallo,
ich habe Grafiken, die lokal in einem Verzeichnis lagen, seither so geladen:
If Range("L4").Value = "red" Then
Set pct = ActiveSheet.Pictures.Insert("C:\Daten\Grafiken\Rot2.jpg")
pct.Left = Range("BS5").Left
pct.Top = Range("BS5").Top + 5
pct.Height = 63
pct.W...
04.01.2010 14:25:13
Thread-ID: 1127051
7 Beiträge
Wert aus anderem Tabellenblatt
Micha*
TabelleX.Range("A1")
16.04.2002 12:32:11
Thread-ID: 113680
2 Beiträge
Combobox Listfillrange
Yusuf

Hallo,
ich habe ein Combobox (Steuerelement Toolbox) im Tabellenblatt "EingabeMaske".
Hatte diese Combobox mit Werten aus dem Tabellenblatt "Stundensaetze" "E2:E28" fuellen lassen.
Ich wollte die Combox um einen Eintrag erweitern also "E2:E29", jedoch laesst sich in die Eigenschaft...
04.11.2010 13:50:32
Thread-ID: 1185145
2 Beiträge
Auswahl in anderem Tabellenblatt speichern
Jürgen

Hallo und guten Morgen,
ich habe da ein etwas (für mich) kompliziertes Problem und hab keinen Plan wie es gehen kann.
Also ich verusche ich es mal zu erklären:
Ich möchte auf dem Sheet1 an Zelle c25 eine Zahl zwischen 1 und max. 20 eintragen!(es soll auch nur eine Zahl in diesem Spi...
26.12.2010 11:30:04
Thread-ID: 1192833
7 Beiträge
Combobox füllen bei Auswahl des Tabellenblatts
Frank

Hallo Zusammen,
erst mal möchte mich nochmals bedanken.
Dieses Forum ist einfach klasse.
Nun zu meinem Problem.
Ich habe eine Arbeitsmappe mit zwei Tabellen.
Soll immer mit Tabelle1 geöffnet werden.
Die Combobox die gefüllt wird liegt auf einer Userform die beim öffnen d...
25.02.2011 10:28:20
Thread-ID: 1202874
3 Beiträge
Anzeige

Links zu Excel-Dialogen

ComboBox

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
2
17
2
6
6
1
1
6
2
8
2
2
5
2
2
6
5
3
2
2
7
1
1
2