zellen markieren

Forumthread: zellen markieren

zellen markieren

01.08.2005 10:53:39

Gerald

hi leute,
wie kann ich feststellen wie viele Zellen markiert sind?
wie leg ich am besten eine schleife über alle zellen,
will zb in jede makierte zelle ein "a" dazuschreiben
lg

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: zellen markieren

01.08.2005 10:57:12

Matthias5
AW: zellen markieren

01.08.2005 11:35:35

Gerald
Sieh dir mal die Funktion "MID" an! oT

01.08.2005 12:25:59

Matthias5
AW: Sieh dir mal die Funktion "MID" an! oT

01.08.2005 13:26:35

Gerald
Änderung in gesamter Mappe

01.08.2005 13:38:47

Matthias5
AW: zellen markieren

01.08.2005 11:04:42

Hajo_Zi

AW: zellen markieren

01.08.2005 10:57:12

Matthias5

Hallo Gerald,
das könntest du so machen:
Dim Zelle as Range
For each Zelle in Selection
Zelle.Value = Zelle.Value & "a"
next
Gruß,
Matthias

AW: zellen markieren

01.08.2005 11:35:35

Gerald

hi,
ich mach das grad so:
Dim MyString As String
Dim Start_Select As String
Dim End_Select As String
MyString = ActiveWindow.RangeSelection.Address
MyString = Replace(MyString, "$", "")
MyPos = InStr(1, MyString, ":", 1)
Start_Select = Left(MyString, MyPos - 1)
End_Select = Right(MyString, MyPos - 1)
MsgBox Start_Select
MsgBox End_Select
ich suche eine funktion substring(string, start, end)
will einen teilstring eines strings haben...
gibt es da was?
cu

Sieh dir mal die Funktion "MID" an! oT

01.08.2005 12:25:59

Matthias5

AW: Sieh dir mal die Funktion "MID" an! oT

01.08.2005 13:26:35

Gerald

jo, danke schon gefunden;-)
wie kann ich Änderungen für makierte zellen "für jedes sheet" im workbook machen...!?
und wie mach ich ein makro, dass wenn man zb in eine zelle "H" eingibt das automatisch in
"H1" ändert...ich wusst das schon mal, habs leider vergessen;-(
wo gib ich dann das makro rein, in "ThisWorkbook" ?
cu

Änderung in gesamter Mappe

01.08.2005 13:38:47

Matthias5

Hi,
so trägst du Änderungen in der gesamten Mappe ein:

Sub test() Dim Blatt As Worksheet For Each Blatt In ActiveWorkbook.Worksheets Blatt.Range("H1") = "Hallo" Next End Sub

Gruß,
Matthias

AW: zellen markieren

01.08.2005 11:04:42

Hajo_Zi

Hallo Gerald,


Sub Zelle()
MsgBox Selection.Count
Selection.Value = "A"
End Sub

Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.

Beliebteste Forumthreads (12 Monate)

Forumthread: zellen markieren

6 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu diesem und ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread