Auswahl aller nicht leeren zellen.

Forumthread: Auswahl aller nicht leeren zellen.
1 Beitrag zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Auswahl aller nicht leeren zellen.

28.01.2005 09:43:39

Johannes

Hallo,
Ich habe Probleme mit dem definieren eines Datenbereichs.
Ich greife auf eine Text-Datei über "externe Daten" zu. Der Inhalt dieser TExt datei ändert sich aber ständig. Ich würde gern wissen, wie man per VBA alle nicht leeren Felder markiert und dieser Auswahl einen Namen gibt (definiert). Vielen Dank, Johannes.

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Auswahl aller nicht leeren zellen.

UweD

AW: Auswahl aller nicht leeren zellen.

UweD

Hallo
so gehts.


Sub AuswahlMitText()
Dim Benennung$, Bereich$, Myrange As Range
Benennung = "MitText"
Bereich = "A:B" ' Bereich, der so bearbeitet werden soll
Set Myrange = Columns(Bereich).SpecialCells(xlCellTypeConstants, 3)
ActiveWorkbook.Names.Add Name:=Benennung, RefersToR1C1:=Myrange
End Sub

Gruß UweD