1. Yeni bir Word dosyası oluştur
Word programını aç.
Boş bir belge oluştur.
2. Tabloyu ekle
Menüden Ekle > Tablo seçeneğine tıkla.
2 sütun ve 4 satırdan oluşan bir tablo ekle (dosya sayısına göre satır sayısını ayarla).
Örnek: Sol sütun "Dosya Adı", sağ sütun "İçerik".
3. Her dosyanın...
Arkadaşlar, sayın hocalarım. Son dolu hücrenin altını
Sub son_dolu_altı()
Cells.Find(What:="*", After:=Cells(1, 1), SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Offset(1, 0).Select
End Sub
Şeklinde buluyorum ama hücrenin altı oluyor. Mesela son dolu hücrenin altındaki satırın B'den G'ye...
Merhaba, Cevabınız ve desteğiniz için çok teşekkür ederim. Yazdığınız kod aktif olarak çalışıyor gibi gözüküyor test etme şansım oldu. 2 Farklı değişiklik yaptım, Mavi rengin renk kodunu ekledim ve işlem aralığını düzenledim. Fakat sadece düzelmesi gereken 2 nokta kaldı, o kısmıda denedim ama...
•Merhaba,
R sütunu ile alakalı sevk miktarı sipariş miktarından büyük veya Eşit olduğunda "Sipariş Kapandı" ibaresi olur burada şöyle bir soru doğuyor pek nadiren de olsa sipariş adedinden az adet çıkabilir bazen hurda yada ham malzeme yetersiz olduğu için bu noktada manuel olarak ilgili...
Arkadaşlar selamlar,
Satır başındaki iki <strong> arası kelimeleri yeni bir sütuna nasıl formül ile toplu getirebilirim, desteklerinizi rica ederim
<p><strong>Kadın Switchback Pullover Polar</strong><br />Bu ürün, çevre dostu malzemelerle tasarlanmış olup geri...
hocam öncelikle hızlı cevabınızdan dolayı teşekkür ederim. ancak tekerlerk döndü döndü döndü sonra dondu 15 dakika bekledim Word belgesini kapatıp açtım bir değişiklik olmadı.
Merhaba,
Dener misiniz?
Bu makro, file.txt dosyasındaki kelimeleri sırasıyla alarak Word belgesinde arayacak ve bulduğu kelimeleri belirtilen biçimde değiştirecek. Aşağıdaki makroyu Word VBA modülünde kullanabilirsiniz:
Word’ü açın ve Alt + F11 tuşlarına basarak VBA editörünü açın.
Ekle >...
Merhaba,
Dediğiniz gibi CTRL+F ile yapılan aramada renk seçimi yapılmaması excelin bir eksiği bana göre de.
Ben boş bir hücreyi sarıya boyuyorum, o hücreyi seçip Biçim Boyacısının üstüne çift tıklıyorum. Daha sonra CTRL F ile arama yapıyorum.
Bulduğunu sarı yapıyor.
VBA ile de yapılıyor tabiki...
Merhabalar
Range("C1").Value = Range("A1").Value
bu satır ile A1 deki hücre değerini C1 taşıyorum
Range("C2") = Range("A2")
bu satır ile A2 hücresinde her ne var ise renk değer vs
C2 ye taşımam gerekiyor.
Lakin yine sadece değer taşıyor.
Ne yapmam lazım acaba.
Her iki makronun excel de çalışmasını iştiyorum Fareyi sağ tıklamada Büyük/Küçük Harf pencere olarak açlıyor (ok) sağ kılik üerinde renkler yazan satır olarak gelsin tıklandıgı zaman renk ler gözüksün 5 rek var orada.
Merhaba VecİK
Öncelikle sablon.docx 'deki yer imlerine girilmiş verileri silin.
sadece verileri, yer im işaretleri kalmalı.
Bir de en sona Toplam satırının altına bir adet boş satır ekleyin.
Private Sub CommandButton1_Click()
Dim wordapp As Object, doc As Object, i As Integer
Set wordapp =...
Merhaba.
Aşağıdaki satır dosyayı kaydediyor. Bunu bir satır aşağı alın
doc.SaveAs2 "C:\Users\ismail\Desktop\Test\test.docx"
Aşağıdaki gibi olmalı.
Private Sub CommandButton1_Click()
Dim doc As Word.Document
Set wordapp = CreateObject("word.application")
sablon =...
Merhaba, elimde 100 satırlık excel var bunu worde aktarmak istiyorum. Formdan yola çıkarak bir yere kadar geldim. Şu an sorunum tek satır olarak attı. İşime yaracak olan exceldeki 100 satırı 100 sayfa seklınde worde aktarmak. Yaptığım işlem ;+
NOT: Bunu yapmak istemem bir ayakkabı firmasında...
Merhaba, elimde 100 satırlık excel var bunu worde aktarmak istiyorum. Buradan yola çıkarak bir yere kadar geldim. Şu an sorunum tek satır olarak attı. İşime yaracak olan exceldeki 100 satırı 100 sayfa seklınde worde aktarmak. Yaptığım işlem ;+
NOT: Bunu yapmak istemem bir ayakkabı firmasında...
Merhabalar. Daha önce tahmin formülü ile bazı verileri kullanarak bilinmeyenlerin tahmin edilmesi hususunda @ÖmerBey den de destek alarak bir dosya oluşturdum. Bugün tekrardan ilgili dosya üzerinde çalışırken fark ettim ki belli bir sütun sonra normal olmayan biçimde sıralamalar değişiyor. Örnek...
1. Hücreleri Temizleme Rutinleri
Bu alt rutin, belirli bir aralıktaki hücreleri temizlemek için kullanılabilir. Örneğin, rapor hazırlarken eski verileri temizlemek için idealdir.
Private Sub ClearRange(rangeAddress As String)
Sheets("Sheet1").Range(rangeAddress).ClearContents
End Sub
2. Mesaj...
İşin 10.000 satır için performans olayını bir tarafa bırakarak,
İNDİS - TOPLAMA işlevleri kullanarak Çok Koşul için Listedeki Sırasıyla ve Alfabetik Sıralı olarak Benzersizlerin bulunmasına örnek olsun....
Dosyanızı göremediğim için, tablo ile örnek...
Başlıklar : A1 : E1
Veriler : A2 : E79...
ListView1’in 1. sütunundaki her satır için, Bordro sayfasının D sütununda eşleşen bir veri varsa, o satırın rengini değiştirmek istediğinizi anlıyorum. İşte bu işlemi gerçekleştirecek VBA kodunun bir örneği:
Dim m As Integer
Dim listItem As ListItem
With Sheets("Bordro")
For m = 1 To...
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.