| 
                              
                                  Thema
                              
                           | 
                          
                              
                                  Datum 
                           | 
                          
                              
                                  Von Nutzer
                           | 
                          
                              
                                  Rating
                           | 
                          
                               
                                  Antwort 
                           | 
                      
                      
  Bestimmte Items in Listbox auswählen aus Tabelle  | 
30.12.2013 21:41:36 | 
Michael | 
 | 
 | 
 | 
01.01.2014 10:15:46 | 
Holger | 
 | 
 | 
 | 
01.01.2014 12:08:37 | 
Michael | 
 | 
 | 
 | 
01.01.2014 16:33:10 | 
Holger | 
 | 
 | 
 | 
02.01.2014 18:41:55 | 
Michael | 
 | 
 | 
                  
    
                    
             
								 
									
										Von: 
                                            Michael | 
										Datum: 
                                            30.12.2013 21:41:36 | 
										Views:
                                             
                                            2018 | 
										Rating:
                                                                          | 
										Antwort: 
                                             
                                             
                                             | 
									
									
										Thema:
                                             
                                            Bestimmte Items in Listbox auswählen aus Tabelle | 
									
									
										|  
                                             
	Hallo Zusammen, 
	  
	wie kann ich folgenden Code umbauen um 
	  
	alle einträge die sich z.b. in tabelle1.range ("A1:A20") befinden in einer Lisbox (Multiselected, direkt in der Excel Tabelle, Active X Box) auswählen (Selected) zu lassen. 
	  
	z.b. 
	Tabelle1.range ("A1:A40") 
	haus1 
	haus3 
	haus5 
	  
	  
	  
	Lisbox einträge: (x = markierte) 
	Haus0 
	Haus1    x 
	Haus2 
	Haus3    x 
	Haus4 
	Haus5    x 
	Haus6 
	  
	Mit dem Makro unten lese ich ja die aus die ausgewählt wurden, bekomme es aba net hin das genau andersrum zu bauen. mit der "Find" Methode oder so? 
	  
	   For i = 0 To Tabelle17.ListBox1.ListCount - 1 
	 
	      If Tabelle17.ListBox1.Selected(i) Then 
	         Tabelle1.Cells(65000, 19).End(xlUp).Offset(1, 0) = Tabelle17.ListBox1.List(i) 
	      End If 
	 
	   Next i 
	  
	  
	Danke & Gruß 
	  
	Michi 
     | 
									
								
							
 					
		   
 
                          
                        
                                
                    - Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
 
                                        - Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
 
                        - Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
 
                        - Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
 
                        - Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei 
    Antworten auf Ihren Beitrag zu benachrichtigen
 
                                    
                            
                             
                          
	
                         
                                  
                             
                             Bitte geben Sie ein aussagekräftiges Thema an. 
                            
                            Bitte geben Sie eine gültige Email Adresse ein!
                            
                            
                       
                                - Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
 
                                        - Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
 
                        - Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
 
                        - Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
 
                        - Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei 
    Antworten auf Ihren Beitrag zu benachrichtigen
 
                                    
                        
                            
                        
                         
                                                  
 
                                       
                            
                      
                          | 
                              
                                  Thema                               
                           | 
                          
                              
                                  Datum 
                           | 
                          
                              
                                  Von Nutzer
                           | 
                          
                              
                                  Rating
                           | 
                          
                               
                                  Antwort 
                           | 
                      
                      
  Bestimmte Items in Listbox auswählen aus Tabelle  | 
30.12.2013 21:41:36 | 
Michael | 
 | 
 | 
 | 
01.01.2014 10:15:46 | 
Holger | 
 | 
 | 
 | 
01.01.2014 12:08:37 | 
Michael | 
 | 
 | 
 | 
01.01.2014 16:33:10 | 
Holger | 
 | 
 | 
 | 
02.01.2014 18:41:55 | 
Michael | 
 | 
 |