Excel - Txt Vcf Oluşturmak
-
arkadaşlar elimdeki 1000 adet excell veya txt de kayıtlı numaradan vcard oluşturmak istiyorum nette çok buldum kimisi paralı kimisi olmadı txt deki veri isim ve telefon olarak kayıtlı tab tuşu ile ayrılmış durumda bi kod buldum exell için ama nasıl çalıştırılacağını bilmiyorum hazır hali var ama oda limitli.
https://officetricks.com/convert-contacts-in-excel-to-vcf-format/
'External Properties & Functions Declaration Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As Long, ByVal Operation As String, ByVal Filename As String, Optional ByVal Parameters As String, Optional ByVal Directory As String, Optional ByVal WindowStyle As Long = vbMinimizedFocus) As Long Private Sub Create_VCF() 'Open a File in Specific Path in Output or Append mode Dim FileNum As Integer Dim iRow As Double iRow = 2 FileNum = FreeFile OutFilePath = ThisWorkbook.Path & "\OutputVCF.VCF" Open OutFilePath For Output As FileNum 'Loop through Excel Sheet each row and write it to VCF File While VBA.Trim(Sheets("Sheet1").Cells(iRow, 1)) <> "" FName = VBA.Trim(Sheets("Sheet1").Cells(iRow, 1)) LName = VBA.Trim(Sheets("Sheet1").Cells(iRow, 2)) PhNum = VBA.Trim(Sheets("Sheet1").Cells(iRow, 3)) Print #FileNum, "BEGIN:VCARD" Print #FileNum, "VERSION:3.0" Print #FileNum, "N:" & FName & ";" & LName & ";;;" Print #FileNum, "FN:" & FName & " " & LName Print #FileNum, "TEL;TYPE=CELL;TYPE=PREF:" & PhNum Print #FileNum, "END:VCARD" iRow = iRow + 1 Wend 'Close The File Close #FileNum MsgBox "Contacts Converted to Saved To: " & OutFilePath & " - Join Email Subscription To Get Latest Updates" ShellExecute 0, "Open", "https://officetricks.com/email-subscription-page/" End Sub
-
Txtlerden excele veri cekmek zor degildir diye düşünüyorum vardır makrolari. Excelde metni sutunlara donustur den bosluktan ayiri secip olur belki.
-
nukeshore bunu yazdı
Txtlerden excele veri cekmek zor degildir diye düşünüyorum vardır makrolari. Excelde metni sutunlara donustur den bosluktan ayiri secip olur belki.
Hocam amacım o degil amacım excelde veya txt den vardı yapmak
-
https://www.youtube.com/watch?v=r95iKz4wyYM
şöyle csv yap
http://kesan.meb.gov.tr/meb_iys_dosyalar/2013_04/11035725_csvklavuzu.pdf
şöylede google kişilere at
sonra googledan indirirsin
-
birçok site, uygulama vb.. denedi ama istedigim gibi olmadı 100.000 adet numara eklemek istiyorum rehbere yokmu yapabilecek birisi ? veriyi db den de alabilir exceldende alabilir
-
hocam bende iki gündür androidden ios a geçerken araştırıyordum bu rehber aktarma olayını.
bi tane excel dosyası buldum, isimleri ve numaraları ayrı sütunlara yazıosun, bi makro butonu var, basınca otomatik olarak oluşturuo,
akşam eve gidince uploadlarım.
-
LynXMaSTeR bunu yazdı
hocam bende iki gündür androidden ios a geçerken araştırıyordum bu rehber aktarma olayını.
bi tane excel dosyası buldum, isimleri ve numaraları ayrı sütunlara yazıosun, bi makro butonu var, basınca otomatik olarak oluşturuo,
akşam eve gidince uploadlarım.
hocam onlar patlıyor
sen wondershare ile aktarım yapabilirsin daha kolay olur
https://check.aye.vn/ şu biraz daha iyi gibi
KaptaN tarafından 31/Ağu/17 10:14 tarihinde düzenlenmiştir -
KaptaN bunu yazdıLynXMaSTeR bunu yazdı
hocam bende iki gündür androidden ios a geçerken araştırıyordum bu rehber aktarma olayını.
bi tane excel dosyası buldum, isimleri ve numaraları ayrı sütunlara yazıosun, bi makro butonu var, basınca otomatik olarak oluşturuo,
akşam eve gidince uploadlarım.
hocam onlar patlıyor
sen wondershare ile aktarım yapabilirsin daha kolay olur
https://check.aye.vn/ şu biraz daha iyi gibi
patlıyor derken?
akşam denedim gayet düzgün çalışıyordu hocam, 460 tane kaydı 2 saniye içinde oluşturdu.
-
LynXMaSTeR bunu yazdıKaptaN bunu yazdıLynXMaSTeR bunu yazdı
hocam bende iki gündür androidden ios a geçerken araştırıyordum bu rehber aktarma olayını.
bi tane excel dosyası buldum, isimleri ve numaraları ayrı sütunlara yazıosun, bi makro butonu var, basınca otomatik olarak oluşturuo,
akşam eve gidince uploadlarım.
hocam onlar patlıyor
sen wondershare ile aktarım yapabilirsin daha kolay olur
https://check.aye.vn/ şu biraz daha iyi gibi
patlıyor derken?
akşam denedim gayet düzgün çalışıyordu hocam, 460 tane kaydı 2 saniye içinde oluşturdu.
hocam ben 10 bin ve üzeri kayıt için kullanacağım
hatta 100.000 desem daha dogru olur
-
Örnek veri atsana bakalım? Yazayım ufak bir şey sana
Wifi yok ama ufak bişey at :(
-
KaptaN bunu yazdıLynXMaSTeR bunu yazdıKaptaN bunu yazdıLynXMaSTeR bunu yazdı
hocam bende iki gündür androidden ios a geçerken araştırıyordum bu rehber aktarma olayını.
bi tane excel dosyası buldum, isimleri ve numaraları ayrı sütunlara yazıosun, bi makro butonu var, basınca otomatik olarak oluşturuo,
akşam eve gidince uploadlarım.
hocam onlar patlıyor
sen wondershare ile aktarım yapabilirsin daha kolay olur
https://check.aye.vn/ şu biraz daha iyi gibi
patlıyor derken?
akşam denedim gayet düzgün çalışıyordu hocam, 460 tane kaydı 2 saniye içinde oluşturdu.
hocam ben 10 bin ve üzeri kayıt için kullanacağım
hatta 100.000 desem daha dogru olur
vcf de tek dosya için 500 yada 1000 kişi limiti vardı, bilginize.