Új hozzászólás Aktív témák

• #17185 Delila_1 veterán m.zmrzlina #17184

  Új Válasz 2013-03-11 14:31:03 #17185

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Delila_1

  veterán

  válasz m.zmrzlina #17184 üzenetére

  Nézd meg ezt a kis makrót, ami az "azonosító" tartalmú cellát keresi meg az aktív lapon.

  Sub azonosito_oszlopa()
  Dim C As Range
  Set C = ActiveSheet.Cells.Find("azonosító")
  If Not C Is Nothing Then
  MsgBox "Az azonosító mező a(z) " & C.Column & ". oszlopban van"
  Else
  MsgBox " Az azonosító mező nem található."
  End If
  End Sub

Új hozzászólás Aktív témák