• DİKKAT !

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak Dosya Yükleme tamamen ücretsizdir.

    Giriş yap veya Şimdi kayıt ol

Çözüldü Kod ile birleştirme ve ayırma

Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
seng

seng

Yeni Üye
Katılım
7 Nis 2021
Mesajlar
807
Çözümler
1
Aldığı beğeni
94
Excel V
Office 2013 EN
Konu Sahibi
Arkadaşlar herkese selamlar, ekteki excelde butona tıkladıgımda null değerleri hariç her satır için en son sütununu bulsn ve birleştirsin, daha sonra ise ";" den tüm değerleri sütunlara ayırsın istiyorum nasıl yapabilirim şimdiden teşekkür ederim.
 

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.
Çözüm
halily
aşağıdaki kod işinize yarayabilir
CSV dosyası ve excel dosyası aynı klasörde olmalı
çıktı dosyası olarak ben başka isim verdim eğer aynı dosya olacaksa ismini değiştirmeniz yeterli
HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
Tarihe göre sırala Oylara göre sırala
eklediğiniz dosya excel dosyası değil, biçimlendirilmiş daha doğrusu veri dosyası olarak okunacak şekilde biçimlendirilmiş bir metin dosyası
 
Olumlu oy 0 Negatif oyla
bildiğim kadarıyla CSV dosyasına kod yazılamaz
anacak farklı bir excel dosyası oluşturursunuz orada yazılacak kod csv dosyası üzerinde işlem yapıp kaydeder
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
halily' Alıntı:
bildiğim kadarıyla CSV dosyasına kod yazılamaz
anacak farklı bir excel dosyası oluşturursunuz orada yazılacak kod csv dosyası üzerinde işlem yapıp kaydeder
Genişletmek için tıkla...
Olur hocam yapabilir miyiz? Ben sadece bu dosyayı once bırlestırıp sonra ; kısmından ayırmak istiyorum bu kadar
 
Olumlu oy 0 Negatif oyla
olmasını istediğiniz son halini ekleyip neyi neden yaptığınızı daha ayrıntılı açıklarsanız yardımcı olmaya çalışırız?
Not :
1 - değişiklikler aynı dosya üzerinde mi yapılacak?
2 - sütun sayısı sabit gibi her zaman 14 sütun mu var?
 
Son düzenleme:
Olumlu oy 0 Negatif oyla
Konu Sahibi
Her zaman 14 sütun yok hocam ve 1.satırdaki baslıklara göre ayırmasını beklıyorum, şöyleki öncelikle satırda kaç dolu sütun varsa onları birleştirsin daha sonra "," veya ingilizce sürüm için ";" kısmından ayırsın istiyorum hocam. ancak birleştirirken null yazanlar ", " den ayrılmayacagı için yanlış baslık altına gelebilir onu nasıl onleyebiliriz hocam? çok teşekkür ederim.
 
Olumlu oy 0 Negatif oyla
siz olması gereken sonucu ekleyin biz de inceleyip ona göre çözüm üretmeye çalışalım
şu anda ne yapılacak anlamış değilim
önce birleşsin diyorsunuz bunun anlamı ayraçların yani ";" silinmesidir bunları silince nasıl tekrar ayıracağız?
null yazılarını replace() fonksiyonuyla çıkarabiliriz ama ne yapacağımızı anlamış değilim
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
halily' Alıntı:
siz olması gereken sonucu ekleyin biz de inceleyip ona göre çözüm üretmeye çalışalım
şu anda ne yapılacak anlamış değilim
önce birleşsin diyorsunuz bunun anlamı ayraçların yani ";" silinmesidir bunları silince nasıl tekrar ayıracağız?
null yazılarını replace() fonksiyonuyla çıkarabiliriz ama ne yapacağımızı anlamış değilim
Genişletmek için tıkla...
Hocam 14.satırda gösterdim
, veya ; olan yerden ayırsın ıstıyorum hocam bırde null kelımelerını.
 

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.
Olumlu oy 0 Negatif oyla
aşağıdaki kod işinize yarayabilir
CSV dosyası ve excel dosyası aynı klasörde olmalı
çıktı dosyası olarak ben başka isim verdim eğer aynı dosya olacaksa ismini değiştirmeniz yeterli
HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Olumlu oy 1 Negatif oyla
Çözüm
Konu Sahibi
halily' Alıntı:
aşağıdaki kod işinize yarayabilir
CSV dosyası ve excel dosyası aynı klasörde olmalı
çıktı dosyası olarak ben başka isim verdim eğer aynı dosya olacaksa ismini değiştirmeniz yeterli
HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
Genişletmek için tıkla...
Hocam hata aldım sizde bakabilir misiniz? teşekkür ederim.
 

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.
Olumlu oy 0 Negatif oyla
ne hatası verdi?
 
Olumlu oy 0 Negatif oyla
siz dosyayı CSV olarak kaydetmiyorsunuz ki excel olarak kaydetmeye çalışmışsınız
seng' Alıntı:
Ben sadece bu dosyayı once bırlestırıp sonra ; kısmından ayırmak istiyorum bu kadar
Genişletmek için tıkla...
yukarda da belirtmişsiniz bu dosyayı diyerek, csv dosyasını kastetmişsinz.
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
halily' Alıntı:
siz dosyayı CSV olarak kaydetmiyorsunuz ki excel olarak kaydetmeye çalışmışsınız

yukarda da belirtmişsiniz bu dosyayı diyerek, csv dosyasını kastetmişsinz.
Genişletmek için tıkla...
Hocam düzelttim yine olmadı.
 

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.
Olumlu oy 0 Negatif oyla
CSV dosyalarınızın kaynağı ne?
ilk gönderdiğiniz dosyada vbNewLine ayracı ile satırlara bölünmüştü ama son dosyanızda Chr(10) ayraç olarak kullanılmış?
HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
satırını HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
satırı ile değiştirip dener misiniz?
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
Path not found dıyor hocam ama aslında evet o uzantıda dosyam sizde hata veriyor mu acaba?
 

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.
Olumlu oy 0 Negatif oyla
Olumlu oy 0 Negatif oyla
son eklediğiniz dosyayı (16. mesajdaki excel dosyanızdaki kod), son eklediğiniz CSV dosyası (11. mesajdaki CSV dosyanızdaki veri) için denediğimde hata vermedi
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
strPath = ThisWorkbook.Path & "\" & "basdere_imza_2.csv" ''yeni dosyanin adi
Open strPath For Output As #1
Print #1, TmpVr
Close #1
halily' Alıntı:
son eklediğiniz dosyayı (16. mesajdaki excel dosyanızdaki kod), son eklediğiniz CSV dosyası (11. mesajdaki CSV dosyanızdaki veri) için denediğimde hata vermedi
Genişletmek için tıkla...

Hocam bu kısımda o hatayı veriyor ben de evet aynı uzantıda dosya ile, acaa aynı dosya üzerine mi kaydetsek değişiklikleri o da olabilir hocam
 
Olumlu oy 0 Negatif oyla
Excel dosyanızın adresi ne?
Bazı durumlarda bazı konumlara dosya ekleme yetkiniz olmayabiliyor
 
Olumlu oy 0 Negatif oyla
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst