Merhaba;
Kapalı olan "İZİN PROGRAMI" adlı dosyada bulunan tüm sayfaları(worksheets) listboxta listelemek istiyorum.
Desteğini esirgemeyen excel dostlarına şimdiden teşekkür ederim.
Merhabalar,
Rastgele kendi kodlarımdan deneme yanılma yöntemiyle çözdüm ve aşağıdaki kodları paylaşıyorum.
Buradaki kod excelsayfanızda açıldığında otomatik olarak çalışmasını sağlıyor.
Sub Auto_Open()
End sub
Buradaki kod ise sağ taraftaki uzak sunucu, sol taraf ise açık olan excelsayfası...
Sub test()
Dim filePath As String, sourceSheet As Worksheet, lastSourceRow As Long, Rng As Range
filePath = "C:\Users\murat\Desktop\örnek.xlsx"
Application.ScreenUpdating = False
GetObject filePath
Windows(Dir(filePath)).Visible = False
Set sourceSheet =...
Arkadaşlar merhaba,
Excel konusunda ne yazık ki çok bilgili değilim.
Çalıştığım şirkette yıl içerisinde verilmiş excel formatında teklifler var. Bu tekliflerin 1. sayfasında Genel Toplam yazılı hücrenin karşısında toplam teklif tutarı yazıyor. (Ayrıca 2. sayfa ve 3. sayfası olan teklifler de...
Herkese merhabalar;
İş yerinde kullanmakta olduğumuz bir sistemden raporlama yapmaktayız. Rapor dosyalarını sistem excel şeklinde verebiliyor. Fakat değerler çok fazla ve ayrıntılı olduğu için hazırlamak çok uzun zamanımızı alıyor. Şöyle birşey düşünüyorum. Ben sistemden rapor dosyalarını...
Option Explicit
Sub Import_Data_Ado()
Dim Process_Time As Double, File_Folder As String, My_File As String
Dim My_Connection As Object, My_Recordset As Object, My_Query As String
Dim S1 As Worksheet, S2 As Worksheet, Store_Name As String
Dim Old_Calculation_Mode As Integer...
Merhaba,
Masaüstünde "ANKARA" adındaki bir klasör içinde ekte yer alan dosyadan aylık olarak 10 ile 100 adet excel çalışma kitabı bulunuyor. Tüm dosyalar standart.
Şu anda tüm sayfaları tek tek açarak aşağıda belirttiğim verileri ilgilere yerlere kopyala-yapıştır ile yapıyorum. Bu yükten...
Haklısınız.
Butona atadığınız kodu silin.
Aşağıdakileri kod sayfanıza yapıştırın.
Bu bir ADO değildir
Çalışması için şartlardan biri KAPALI isimli dosyanızın bı dosyayla aynı klasörde kaytlı olmasıdır.
Eğer farklı bir klasörde ise yolu belirtmeniz lazım.
@Korhan Ayhan beyin forumdaki bir başka...
Merhaba Erdem bey,
Bu kod çalışıyor ancak ben sizin kodunuzda olduğu gibi kolon isimleri olan değil de boş bir sayfa eklemek istiyorum. Yardımcı olabilir misiniz?
Sayın Uzman arkadaşlar,
Aşağıdaki kod ile kapalı çalışma kitabının "A1:K750" aralığından veri alıyorum.
Kapalı kitap farklı bir programdan alınan veri olduğu için her sayfa için bir başlık bulunmaktadır.
İlk başlığın bilgilerini alarak, "A1:K750" aralığında metinsen ifadeler içeren satırları...
Merhaba,
Kapalı bir excel dosyasına ADO bağlantıda sorgu oluştururken;
Aşağıdaki kodda Alan adını (Report_No) yazmak yerine sütun numarasını yazmak mümkünmüdür,
Özetle Report_No alanı "E" sütununda bu nedenle sütun numarası olarak 4 (=5-1) yazmak mümkündür? yada farklı bir yöntemi var mıdır...
Merhabalar
Elimde kodların olduğu bir excelsayfası ve dataların tutulduğu 2. bir Data adında excel dosyası ve Data dosyasın içinde 10 sayfa var. Bu sayfa adlarını Kodların olduğu exceldeki form açılırken listboxta listelemem mümkün mü. Daha sonra listboxtan seçilen sayfadaki. 5 sütunun 1...
Merhaba
Kapalı bir excelsayfasından aşağıdaki kod ile verileri alıyorum. Fakat aldıktan sonra her seferinde mevcutta yeni sayfa açarak kopyalıyor mevcut sayfama yeni sayfa açmadan belirlediğim sayfaya ekleme nasıl yapabilirim?
Sub CopySheetFromClosedWB()
Application.ScreenUpdating = False...
Option Explicit
Sub Verileri_Aktar()
Dim Yol As String, Dosya As Variant, S1 As Worksheet, Zaman As Double
Dim Baglanti As Object, Sorgu As String, Kayit_Seti As Object
' On Error Resume Next
Zaman = Timer
Application.ScreenUpdating = False
Set Baglanti =...
Sayın uzman arkadaşlar,
Ekteki çalışmada kapalı çalışma kitabından "VERİTABANI" isimli sayfaya veri alıyorum. Bu işlemi yaparken "VERİTABANI" sayfasının tüm biçimlendirmelerini korumak için aşağıdaki kodu nasıl revize etmeliyim?
Saygılarımla.
Sub Completed_Sayfasından_Al()
Dim con As Object...
Bunun için önce kapalı dosyadaki sayfa adını öğrenmek gerekiyor. Eğer kapalı dosyada birden fazla sayfa varsa hangisinden veri alınacağını bilmeniz gerekiyor.
Aşağıdaki linkteki mesajda buna ilişkin kodlama var. Kendinize uyarlayabilirsiniz. (Anahtar kelime; Catalog)...
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.