Ekte verilen.xls dosyasını unicode txt'e çevirirken arada birçok boşluk bırakıyordu.Forumda bulduğum aşağıdaki kodu kullandım bütün boşlukları kapatırken g ile h sütunu arasındaki boşluğu kapatmıyor.
Şu şekilde çıkıyor;
Sorum şu: Bu aradaki boşluğu nasıl kapatırız ve dönüştürürken unicode txt...
Üstadlarım hepinize iyi akşamlar. Ekteki dosya ile ilgili bir sorum olacak.
Ekteki dosyada bir tuş ile txt dosyası oluşturabiliyorum. Fakat sizlerden isteğim şu. Benim buradan öğrendiğim kod ile yaptığım tuş ile bütün satırlara ait txt dosyası oluşuyor. Benim isteğim ise txt oluşurken telefon...
Open "\deneme.txt" For Output As #1
Do While Not EOF(1)
Line Input #1, Txtdata
Loop
If Txtdata = TextBox1.value Then
msgbox "yazılar aynı"
Close #1
Else
Print #1, TextBox2.Text
Close #1
end if
deneme.txt deki...
Merhabalar yaptoğım bir formda, Formdan girilen bilgilere göre bir bat file uluşturuyorum ve işleme başla butonuna basıldığında bir exe kullanarak bat dosyasını çalıştırıyorum
Bu çalışma Cmd...
Private Sub CommandButton1_Click()
yol = "C:\Documents and Settings\ak\Desktop" 'Dosyaların kaydedileceği yol
ChDir yol
For i = 0 To ListBox1.ListCount - 1
If ListBox1.Selected(i) = True Then
With Sheets(i + 2)
Open yol & .Name & ".txt" For Output As #1...
daha önce bu formdan bulduğum vba kodunu değiştirmek istiyorum
örnek a1-a70 arasını text dosyası olarak kaydetsin istiyorum ama tek tek yazmak uzun sürer bunun gibi bir kaç dosya var.
Sub QQQQ()
Open "C:\Veri\" & Range("D1") For Output As #1
' eğer önceki verilerin silinmesini istiyorsak "For...
Merhaba,
sütunları text dosyaya atan ve text dosyayı c:\ dizinine kaydeden bir excelim var ancak Exceldeki macro XP'de çalışıp dosyayı kaydederken Vista'da Macro çalışıyor ancak C'de dosya oluşturmuyor. Yardımcı olabilir misiniz Macro aşağıdaki gibidir.
NOT: Macro seviyesi en düşük durumdadır...
Merhaba
Arkadaşlar macroyu çalıştırdığımda runtime error 53 hatası alıyorum.
Bu konuyu bu forumda ve internette araştırdım ama sonuç bulamadım. Aynı problemle ilgili cevap bekleyenlerde var sanırım.
Dikkatimi çeken aşağıdaki macroyu daha önce çalıştırdığım halde 1 haftadır birşey oldu hata...
Aşağıdaki olayı gerçekleştiremedik. Birçok makro yazan arkadaşlar başaramadı.Yardımcı olursanız sevinirim.....Şimdiden teşekkürler
txt dosyasına kayıt edilecek tablo sarı alan hariç
sdlsd 1/2/2005 121 1 @
sdfsdfsd 2/2/2005 ewr wer 223 3 @
sdfwer...
Sub SME()
dosya1 = "D:\data.txt"
Open dosya1 For Input As #1
dosya2 = "D:\Datalar\SME\data_cıktı.txt"
Open dosya2 For Output As #2
Dim AltNo(50) As String
Do While Not EOF(1)
Line Input #1, read
i = i + 1
If Left(read, 3) = "PNM" Then
AltNo(i) = Left(read, 14)...
Arkadaşlar,
source dosyasından aldığım veriyi işleyip sql script' i oluşturuyorum ve sonra da sql manager' dan script i çalıştırıyorum..
bunu sql manager ile uğraşmadan sql bağlantısı kurup nasıl...
arkadaşlar konumu biraz daha geliştirmem istendi bende farklı bir konu olduğu için yeniden bir başlık açmak durumunda kaldım...
istenilen şey, sayfadaki bilgileri text dosyasına aktarması.
kodunu uyguladığımda bana...
http://www.imkb.gov.tr/veriler/gk/2006/11/tgk200611131.zip adresinde yayımlanan 13 kasım 2006 tarihli geçici kapanış bülteni yer almaktadır.Bu şekliyle bu veriler metastock programı tarafından tanınmamaktadır.Aşağıda verdiğim makro ile bu veriler metastock un tanıdığı formata çevrilmektedir...
Aşağıdaki kodu forumdan aldım.Excel dosyası açıldığında hedefteki txt dosyasına log almakta ama bir sonraki log öncekinin üzerine yazıyor.txt dosyasında satır satır log oluşturmayı beceremedim ayrıca dosyayı açan makinanın ip sini almam nasıl mümkün olur .yardımcı olmanızı rica ediyorum.LTF...
Aşağıdaki kodu forumdan aldım.Excel dosyası açıldığında hedefteki txt dosyasına log almakta ama bir sonraki log öncekinin üzerine yazıyor.txt dosyasında satır satır log oluşturmayı beceremedim ayrıca dosyayı açan makinanın ip sini almam nasıl mümkün olur .yardımcı olmanızı rica ediyorum.LTF...
permission denied hatası ile ilk defa karşılaşmık bulunmaktayım
bir txt dosyasına veri yazdırmak istediğimde karşılaştım
araştırdım hatayı write yetkisinin kısıtlı olmasından kaynaklandığını
söylediler ama anlamadım tabi yardımlarınızı bekliyorum.
'-------Kod aşağıdaki gibi hata nerede...
Selamlar,
Aşağıda Sn. Haluk beye ait kodlara belirli kriterler eklemek istiyorum.
Kriterlerim;
1- Boş olan satırlar silinecek.
2- 21-05-2006 tarihinden küçük ve 20-06-2006 tarihinden büyük tarih içeren satırlar silinecek.
3- İçerisinde "running" geçen satırlar silinecek.
Sonuç olarak...
Arkadaslar,
Asagidaki kodu calistirdigimda Sayfa1'de A1'den A10'a kadar yer alan veriler Deneme.txt isimli bir dosyaya aktariliyor. Sorun su ki; eger hucreler sayi iceriyorsa bir bosluk vererek Deneme.txt'ye yaziyor. Yani;
ali
veli
200
ayse
100
mehmet
gibi.
Sayilarda neden bir bosluk...
Merhaba;
Sıkıntıdan MS Access'i biraz kurcaladım bu akşam ... :mrgreen:
[vb:1:6c9e930dd2]'****************************************************
'* MS Access programinda arac cubuklarindaki *
'* kontrollerin adlari ve ID'lerini bulup, *
'* bir NotePad dosyasina yazdiktan sonra...
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.