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

• #27191 Fferi50 Topikgazda CarrGomm #27190

  Új Válasz 2015-05-31 12:03:29 #27191

  Ú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

  

  Fferi50

  Topikgazda

  válasz CarrGomm #27190 üzenetére

  Szia!

  Ez a két kis függvény bármilyen sok szóközzel tagolt névből leveszi az utolsó tagot és beleteszi az adott cellába:
  Function nevveg(ByRef rng As Range) As String
  nevveg = Mid(rng.value, InStrRev(rng.value, " ") + 1) 'a név utolsó tagja
  End Function
  Function neveleje(ByRef rng As Range) As String
  neveleje = Left(rng.value, InStrRev(rng.value, " ") - 1) ' a név utolsó tagja nélküli rész
  End Function

  A függvényeket egy makró modulba kell bevinned, utána úgy használhatod, mint egy beépített függvényt.

  Üdv.

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