Microsoft Excel

Herbers Excel/VBA-Archiv

Suche eine Formel

Betrifft: Suche eine Formel
von: Max M.
Geschrieben am: 18.04.2003 - 15:05:55

Hallo Excelfreunde,

von B6 bis B25 habe ich Zahlen stehen, von 100 bis 2000.
Irgendeine Zelle (B6 bis B25) wird von mir mit diesen Makro

Sub Unterstrichen()
With Selection.Borders(xlEdgeBottom)
.Weight = xlMedium
End With
End Sub

unterstrichen.
Meine Frage, gibt es eine Formel (in Zelle A6) die mir dann angibt welche Zahl ich unterstrichen habe???

Max M.

  

Re: Suche eine Formel
von: Forum
Geschrieben am: 18.04.2003 - 16:03:15

Hallo Max

so ganz ist mir nicht klar was Du willst, aber vielleicht ist dies ein Ansatz.


Sub Unterstrichen()
    With Selection
        .Borders(xlEdgeBottom).Weight = xlMedium
        Range("A6") = .Address
    End With
End Sub

Gruß Hajo
Der Code wurde getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.

Microsoft MVP für Excel

 

Beiträge aus den Excel-Beispielen zum Thema "Suche eine Formel"