Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
616to620
616to620
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

zahlen suchen

Forumthread: zahlen suchen

zahlen suchen
01.06.2005 11:56:32
Florian
Hi wer kann mir denn bitte helfen?
wie kann ich in einem tabellenblatt die Spalten C und D nach zahlen durchsuchen, die Zahlen in diesem Bereich dann "hochstellen", die zaheln können auch in einem text vorkommen. Dies sol bei der Betätigung einer Befehlsschaltfläche passieren und bei einer anderen Schafltfläche wieder rückgängig gemacht werden.
Florian
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: zahlen suchen
01.06.2005 12:41:46
Uduuh
Hallo,
diese Makros Schaltflächen zuweisen.

Sub hochstellen_an()
Dim C As Range, L As Integer
Application.ScreenUpdating = False
For Each C In Range("C:D").SpecialCells(xlCellTypeConstants)
For L = 1 To Len(C)
If IsNumeric(Mid(C, L, 1)) Then _
C.Characters(Start:=L, Length:=1).Font.Superscript = True
Next L
Next C
Application.ScreenUpdating = True
End Sub



Sub hochstellen_aus()
Cells.Font.Superscript = False
End Sub
Gruß aus'm Pott
Udo

Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige