Unterschiedliche Zellen markieren

Dieses Thema Unterschiedliche Zellen markieren im Forum "Windows XP Forum" wurde erstellt von Vendor2k, 4. März 2005.

Thema: Unterschiedliche Zellen markieren Hi, ich weis, dass ich hier nicht gerade richtig bin, aber vielleicht kann mir doch jemand weiter helfen. Mein...

  1. Hi,

    ich weis, dass ich hier nicht gerade richtig bin, aber vielleicht kann mir doch jemand weiter helfen.

    Mein Problem ist, dass ich mehere Zellen in Excel per Makro markieren will.

    Wenn ich ein Makro aufzeichne, sieht das dann so aus:

    Range(A2,B2,C3,D7)

    Da ich aber nach Zellen mit bestimmten Inhalt suche und nur eine absolute Position
    wie Row1 Cell5 bekomme, klappt das mit dem markieren nicht.

    Ich habe eine große Liste, will nach mehreren Überschriften suchen, dann einen Artikel in einer Spalte finden und dann die Werte der auseinanderliegenden Zellen kopieren.

    Wie kann ich z.B. ROW 24 COLUMN 4 und die Zelle ROW 24 COLUMN 7 zugleich markieren?

    Wäre super, wenn mir jemand helfen könnte.


    Gruß Vendor
     
  2. Hallo,

    z. Bsp:
    Application.Goto Reference:=R1C1,R1C4:R1C17
     
  3. Hallo Vendor2k,

    ein kleines Beispiel für die Selektion mererer Zellen.

    Gruß Matjes  :)
    Code:
    Sub MehrereZellenSelektieren()
      
      Dim r_ges As Range, r_hinzufuegen As Range
      
     ->ersten Range definieren D24
      Set r_ges = ActiveSheet.Cells(24, 4)
     ->zweiten Range definieren G24
      Set r_hinzufuegen = ActiveSheet.Cells(24, 7)
     ->beide Range in einem zusammenfassen
      Set r_ges = Application.Union(r_ges, r_hinzufuegen)
      
     ->Range selektieren
      r_ges.Select
      MsgBox (jetzt sind auf dem aktuellen Blatt D24 und G24 markiert.)
      
     ->*** eine weitere Zelle der Selection hinzufügen ***
      
     ->Range E24 definieren
      Set r_hinzufuegen = ActiveSheet.Cells(24, 5)
     ->beide Range in einem zusammenfassen
      Set r_ges = Application.Union(r_ges, r_hinzufuegen)
      
     ->Range selektieren
      r_ges.Select
      MsgBox (jetzt sind auf dem aktuellen Blatt D24,E24 und G24 markiert.)
      
     ->Variablen wieder freigeben
      Set r_ges = Nothing
      Set r_hinzufuegen = Nothing
      
    End Sub
     
Die Seite wird geladen...

Unterschiedliche Zellen markieren - Ähnliche Themen

Forum Datum
Startpartition und Programme auf unterschiedlichen Platten Windows 10 Forum 23. Sep. 2016
Verdacht auf unterschiedliche Rechte ... Windows Server-Systeme 6. März 2015
VirtualBox VHD an zwei unterschiedlichen Rechnern Windows XP Forum 8. Sep. 2013
Unterschiedliche Schreib- und Lesegeschwindigkeiten auf SSD Windows XP Forum 10. Jan. 2013
eMail und Homepage mit gleicher Domain bei unterschiedlichen Providern? Windows XP Forum 20. Jan. 2012