alles suchen ist irgendwie ..., welches Schlagwort - ihr vlt. Ahnung
#11
Hallo Frank,

ich habe jetzt nur ein Label und zwei ComboBoxen verwendet. Ich hoffe ich habe es richtig verstanden (Das Label ist diesmal auch nicht rot Blush).

Außerdem habe ich eine extra Tabelle eingefügt, wo ich die Kontinente und die Länder eingetragen haben. Der Sinn des Ganzen sollte dir schon klar werden. Wenn nicht fragt nach.


Angehängte Dateien
.xlsm   re_Konti&Staat.xlsm (Größe: 42,6 KB / Downloads: 7)
Gruß Stefan
Win 10 / Office 2016
[-] Folgende(r) 1 Nutzer sagt Danke an Steffl für diesen Beitrag:
  • WergibtmirRat
Top
#12
(13.06.2014, 17:49)Rabe schrieb: ...bin ich außerstande...
Das ist so wie im Handwerk, der eine kanns/wills, wiederum gibts welche die da nicht ins Detail sich denken mögen.

Du siehst 2 im 90 Gradwinkel (rechter Winkel) Seiten eines Volumenkörpers. Aufgrund der räumlich Länge (liegt im Auge dessen der davor steht) gleiche Schenkellänge, nun lässt es sich mit eventueller Genauigkeit einschätzen wo die gegenüber liegende (diagonal) liegende Ecke sich befindt.....(nicht sichtbar für DICH)................................

cu
Top
#13
(13.06.2014, 18:45)Steffl schrieb: ...Wenn nicht fragt nach...
Hallo Stefan, du bist der Checker

Weitere Frage haben sich soeben erledigt.
mfg und thx gesendet
Top
#14
Hallo Frank,

(13.06.2014, 18:51)WergibtmirRat schrieb: Hallo Stefan, du bist der Checker

Nein, bin ich nicht. Der Code ist bisher auch fehlerhaft und zwar wenn das Tabellenblatt Auswahl nicht aktiv ist wird die ComboBox2 falsch befüllt. Habe es nun geändert.

Code:
Private Sub ComboBox1_Change()

   Dim rngKontinent As Range
   Dim rngBereich As Range
  
   ComboBox2.RowSource = ""
   Label1.Caption = ""
   With Worksheets("Auswahl")
      Set rngKontinent = .Range("C1:I1").Find(ComboBox1.Value, LookIn:=xlValues, lookat:=xlWhole)
      If Not rngKontinent Is Nothing Then
         Set rngBereich = .Cells(2, rngKontinent.Column).Resize(.Cells(1, rngKontinent.Column).End(xlDown).Row - 1)
         ComboBox2.RowSource = rngBereich.Parent.Name & "!" & rngBereich.Address
      End If
   End With

End Sub
Gruß Stefan
Win 10 / Office 2016
Top
#15
Hi Frank,

(13.06.2014, 18:47)WergibtmirRat schrieb: Das ist so wie im Handwerk, der eine kanns/wills, wiederum gibts welche die da nicht ins Detail sich denken mögen.

das ist eben ein Unterschied zwischen uns:

wenn ich Fragen habe, dann formuliere ich die so, daß der Helfer, der sich schon in das Problem reindenken muß, nicht auch noch zusätzliche Schwierigkeiten mit dem Verständnis der Fragen hat. Weil er aufgrund eines hingeworfenen (mit lustigen Abkürzungen oder Formulierungen gespickten) Textes jeden Satz 5 mal lesen muß, um zu verstehen, was überhaupt gefragt ist.

Ich versuche, es dem Helfer möglichst leicht zu machen, mein Problem zu verstehen und nehme mir für die Formulierung auch richtig Zeit. Denn dann muß nur ich die Zeit aufwenden und nicht jeder Leser fürs Verständnis. Ich meine, dadurch erhöhe ich die Zahl derer, die mir helfen wollen/werden.
Top
#16
Ich danke allen für das Verständnis, mir geholfen zu haben - noch zu helfen.
Obwohl hier und da der Gedanke einem abwägig erscheinen mag, bei einem Telefonat lässt sich anders erklären.
In Textformat
Ohne irgend einen Schnörkel nur das objektive zu erwähnen, reicht doch.
Egal wie abstrus diese dann sind.
Bauer schlägt Dame - aber wo ???

cu
@Ralf, du hast es zumindest versucht, zu verstehn; dich reinzudenken.
Top
#17
Hallöchen Ralf,

Zitat:ich muß ehrlich sagen: darum bin ich außerstande, mich in Deine Beiträge reinzudenken und inzwischen lese ich die dann meist gleich gar nicht.
Bei den Ersten habe ich es immer noch probiert, aber dann irgendwann genervt aufgegeben.

Das ich habe ihm auch schon verschiedentlich geschrieben.
Was für ihn offensichtlich ein Spaß darstellt, ist für mich Streß pur

Es wurden mir auch Veränderungen versprochen.
... Inzwischen habe ich entschieden, es lohnt sich nicht, es verstehen zu wollen und es lohnt sich nicht, auf Veränderungen zu warten.
Meine Zeit ist mir dafür zu schade.
Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste