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

• #25729 m.zmrzlina senior tag Agostino #25728

  Új Válasz 2015-03-05 13:49:38 #25729

  Ú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

  

  m.zmrzlina

  senior tag

  válasz Agostino #25728 üzenetére

  Az alábbi pár sor a kijelölt tartomány minden cellájában leellenőrzi, hogy van-e "!" (felkiáltójel) és ha van akkor egy "*" (csillag v. szorzásjel) karaktert tesz a cellatartalom elejére és végére.

  For Each cella In Selection.Cells
  If InStr(1, cella.Value, "!") <> 0 Then
  cella.Value = "*" & cella.Value & "*"
  End If
  Next

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