- Katılım
- 11 Mayıs 2005
- Mesajlar
- 167
- Excel Vers. ve Dili
-
office 2003 tr & eng.
office 2007 tr & eng.
Selamlar,
Makro ile hücre sonlarına , veya ; ekleyerek (makro1) dosyayı csv veya xml uzantılı olarak (makro2) kaydediyorum.
Notpath ile dosyayı açtığımda tüm hücreler " hücre değeri " tırnak içine alınmış ve dosya adına , veya ; eklenmiş oluyor.
murat.csv yerine murat,.csv oalrak kaydediyor.
nasıl düzeltebilirim.
Makro1
Sub virgül_ekle()
Dim hucre As Range
For Each hucre In Range("A1:J65500")
If hucre <> "" Then hucre = hucre & ";"
Next
End Sub
Makro 2
ActiveWorkbook.SaveAs "c:\siparis\" & [A2] & ".xml"
Makro ile hücre sonlarına , veya ; ekleyerek (makro1) dosyayı csv veya xml uzantılı olarak (makro2) kaydediyorum.
Notpath ile dosyayı açtığımda tüm hücreler " hücre değeri " tırnak içine alınmış ve dosya adına , veya ; eklenmiş oluyor.
murat.csv yerine murat,.csv oalrak kaydediyor.
nasıl düzeltebilirim.
Makro1
Sub virgül_ekle()
Dim hucre As Range
For Each hucre In Range("A1:J65500")
If hucre <> "" Then hucre = hucre & ";"
Next
End Sub
Makro 2
ActiveWorkbook.SaveAs "c:\siparis\" & [A2] & ".xml"