programmiersprachen:beispielcode

Unterschiede

Hier werden die Unterschiede zwischen zwei Versionen angezeigt.

Link zu dieser Vergleichsansicht

programmiersprachen:beispielcode [2008/05/08 13:24] – angelegt stprogrammiersprachen:beispielcode [2008/05/08 18:23] (aktuell) – st
Zeile 1: Zeile 1:
 +====== Beispielcode ======
 +  * [[http://www.marusoft.de/vba_schnipsel.htm|VBA-Snipsel]]
 +
 +
 +===== Zelleigenschaften ändern =====
 +
 +<code vb>
 +Dim inhalt As String
 +Dim Zelle
 +
 +For Each Zelle In Range("A:A")
 +    Zelle.Activate
 +    With ActiveCell
 +           .Interior.ColorIndex = 3 'Hintergrundfarbe = rot
 +           End With
 +                        ' Alternativ außerhalb möglich: "ActiveCell.Interior.Color = vbRed"
 +Next
 +</code>
 +
 +===== Zellenadresse ausgeben =====
 +
 +<code vb>
 +Sub ZellAdresse()
 +
 +Dim spalte As String
 +Dim zeile As Long
 +Dim adresse as String
 +
 +adresse = ActiveCell.Address(True, False))
 +spalte = Left(ActiveCell.Address(True, False), InStr(ActiveCell.Address(True, False), "$") - 1)
 +zeile = ActiveCell.Row
 +Cells(1, 1) = spalte & zeile
 +
 +End Sub
 +</code>