Assalamuálaikum pagi Om kid dan BeExceller
saya ada kasus, membuat function di vba dengan function seperti ini
Function gabung(data As String, pemisah as string) As StringDim a As IntegerDim 
b As Stringdata = Selection.Addressb = 
Application.WorksheetFunction.Replace(data, 
Application.WorksheetFunction.Find(":", data), 9, "")a = 
Application.WorksheetFunction.CountA(Range(data))gabung = ""For i = 1 To a    
gabung = gabung & Range(b).Offset(i - 1, 0) &  pemisahNext iEnd Function
saya sudah coba di module hasilnya berjalan lancar, tapi pas di function kenapa 
hasilnya #value yaa. ada saran gak om om sekalian.
niatnya rumusnya itu menggabungkan data yang kita select menjadi satu, kalau di 
excel 2019 ada rumus yang namanya textjoin cuman excel saya masih gak ada.mohon 
infonya mastah sekalian.
terima kasihwassalamuálaikum wr.wb
Fahmi
  • [belajar-exce... Fahmi Syaifullah fahmisyaifulla...@yahoo.com [belajar-excel]
    • Re: [bel... hendrik karnadi hendrikkarn...@yahoo.com [belajar-excel]
    • Re: [bel... 'Mr. Kid' mr.nm...@gmail.com [belajar-excel]
      • Re: ... 'Mr. Kid' mr.nm...@gmail.com [belajar-excel]
        • ... Fahmi Syaifullah fahmisyaifulla...@yahoo.com [belajar-excel]
          • ... 'Mr. Kid' mr.nm...@gmail.com [belajar-excel]

Kirim email ke