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

• #11668 Delila_1 veterán bozsozso #11666

  Új Válasz 2011-10-12 18:45:15 #11668

  Ú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 bozsozso #11666 üzenetére

  Egy új függvény megoldja.

  Function Eleje(cella As String)
  Dim b%
  For b% = Len(cella) To 1 Step -1
  If Mid(cella, b%, 1) = " " Then
  Eleje = Left(cella, b% - 1)
  Exit Function
  End If
  Next
  Eleje = "Nincs szóköz a hivatkozott cellában"
  End Function

  A cellába ezt kell beírnod: =Eleje(A10) , persze csak akkor, ha az A10-ben van a szöveged, aminek az elejét akarod képezni a függvénnyel.

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