-
DİKKAT DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Sorgu için arama sonuçları: IMEX
-
Y
Soru İsmi belli olmayan excel dosyasından veri çekme
Merhaba, bu son attığınız makro ilk attığınızdan ne gibi farklılığı var onu anlayamadım. Öğrenmek için soruyorum bunu, birde ben bu makroları asıl kullanmam gereken yerde malesef kullanamadım. Şimdi attığım örnek bu makroyu asıl kullanmak istediğim yer. Ama oraya taşıyamadım. Birleştirilmiş...- yunusemre16
- Posta #11
- Forum: Fonksiyon Soruları
-
Soru İsmi belli olmayan excel dosyasından veri çekme
...Exit Sub strCon = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source='" & fileopen & _ "';Extended Properties=""Excel 12.0;HDR=YES;IMEX=1"";" strsql = "SELECT [Stok Adı], IIF ([Ödeme Tipi]='Yönetim Misafir', [Satış Miktarı], NULL), " & _ "IIF ([Ödeme...- veyselemre
- Posta #10
- Forum: Fonksiyon Soruları
-
Çözüldü Hücre Bilgisine Göre Data Çağırma(Filtreleme)
...= "Provider=Microsoft.ACE.OLEDB.12.0;Data Source='" & ThisWorkbook.Path & _ "\Data.xlsx';Extended Properties=""Excel 12.0;HDR=NO;IMEX=1"";" Set RS = CreateObject("Adodb.RecordSet") krtr = [M2] strsql = "SELECT * FROM [Sayfa1$] WHERE (F1 + F2 + F3 + F4 +F5 + F6 +...- veyselemre
- Posta #6
- Forum: Makro-VBA Soruları
-
ÜRÜN REÇETE ÇALIŞMA
...= "Provider=Microsoft.ACE.OLEDB.12.0;Data Source='" & ThisWorkbook.FullName & _ "';Extended Properties=""Excel 12.0;HDR=NO;IMEX=1"";" strsql = "SELECT F3, (" & miktar & "*F5), F4,null,null,null,null, F5 " & _ "FROM [VERI$A2:E" &...- veyselemre
- Posta #11
- Forum: Diğer Excel Soruları
-
ÜRÜN REÇETE ÇALIŞMA
...strCon = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source='" & ThisWorkbook.FullName & _ "';Extended Properties=""Excel 12.0;HDR=NO;IMEX=1"";" strsql = "SELECT F3, (" & miktar & "*F5), F4,null,null,null,null, F5 " & _ "FROM [VERI$A2:E" &...- veyselemre
- Posta #5
- Forum: Diğer Excel Soruları
-
Soru Ado kapalı excel bağlantı şifre
Merhaba. Kapalı bir excel dosyasında şifre var.Alttaki koda nasıl bir ilave edilmeli saygılar. adobaglanti = "provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & xxx & ";extended properties=""excel 12.0;hdr=no;imex=1"""- FERAZ
- Konu
- Cevaplar: 5
- Forum: Makro-VBA Soruları
-
ÇOKLU TOPLAMA
...strCon = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source='" & ThisWorkbook.FullName & _ "';Extended Properties=""Excel 12.0;HDR=NO;IMEX=1"";" strSql = "SELECT F1,F2, SUM(F3) " & _ "FROM [Sayfa1$C5:E" & Cells(Rows.Count, 3).End(3).Row & "] " & _...- veyselemre
- Posta #2
- Forum: Diğer Excel Soruları
-
Veri Transferi
...strCon = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source='" & ThisWorkbook.FullName & _ "';Extended Properties=""Excel 12.0;HDR=Yes;IMEX=1"";" strSql = "SELECT Liman, Count(SayKont), Sum(ToplaKap), Sum(ToplaAg) " & _ "FROM " & _ "( " & _...- veyselemre
- Posta #9
- Forum: Excel'e Yeni Başlayanlar
-
Seçili Alanı TXT. Olarak Kaydetmek
...& "];", "Provider=Microsoft.ACE.OLEDB.12.0;Data Source='" & ThisWorkbook.FullName & "';Extended Properties=""Excel 12.0;HDR=Yes;IMEX=1"";" CreateObject("Scripting.FileSystemObject").CreateTextFile(ThisWorkbook.Path & "\TextDosya.txt").Write .GetString(, , "|", vbCrLf) End With...- mancubus
- Posta #14
- Forum: Makro-VBA Soruları
-
T
kapalı dosyadan iki tarih arası veri almak
...con.Open "provider=microsoft.ace.oledb.12.0;data source=" & _ "C:\PERSONEL\PERSONEL_DATA.xlsm" & ";extended properties=""excel 12.0;hdr=no;imex=1""" Sheets("Eksayfa").Cells.ClearContents sorgu = "Select f1,f2,f4,f10,f11,f14,f13,f18,f19,f20,f31,f32,f34,f35,f36,f37,F38 from [PERSONEL$] " & _...- tahsinanarat
- Posta #13
- Forum: Makro-VBA Soruları
-
T
kapalı dosyadan iki tarih arası veri almak
...con.Open "provider=microsoft.ace.oledb.12.0;data source=" & _ "C:\PERSONEL\PERSONEL_DATA.xlsm" & ";extended properties=""excel 12.0;hdr=no;imex=1""" ilktarih = CLng(CDate(Range("G3").Value)) sontarih = CLng(CDate(Range("H3").Value)) sorgu = "Select...- tahsinanarat
- Posta #5
- Forum: Makro-VBA Soruları
-
T
kapalı dosyadan iki tarih arası veri almak
..."provider=microsoft.ace.oledb.12.0;data source=" & _ "C:\PERSONEL\PERSONEL_DATA.xlsm" & ";extended properties=""excel 12.0;hdr=no;imex=1""" sorgu = "Select f1,f2,f10,f11,f14,f13,f18,f19,f20,f31,f32,f34,f35,f36,f37,f38 from [PERSONEL$A2:Am65000]" rs.Open sorgu, con...- tahsinanarat
- Konu
- Cevaplar: 12
- Forum: Makro-VBA Soruları
-
Çözüldü olasılıklı çoklu arama ve listeleme hak.
...adoCN.Properties("Data Source") = ThisWorkbook.FullName adoCN.Properties("Extended Properties") = "Excel 12.0; HDR=yes ; IMEX=1 " adoCN.Open Set rs = CreateObject("ADODB.Recordset") Call adoListele End Sub Sub adoListele() sart = " " If TextBox1.Text <> "" Then sart...- veyselemre
- Posta #5
- Forum: Makro-VBA Soruları
-
Çözüldü Ado ile Textboxdaki yazılana göre sadece Rakamları bulma.
...con.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & ThisWorkbook.FullName & ";Extended Properties=""Excel 12.0;HDR=No;Imex=1""" With Me s = "select f1,f2,f3,f4,Format(f5,'dd.mm.yyyy'),f6 from [Sayfa1$A2:F65000] where not isnull(f1)" If .TextBox1.Text <> "" Then s = s & "...- FERAZ
- Konu
- Cevaplar: 13
- Forum: Makro-VBA Soruları
-
H
ikinci kitabı kapatma hk.
...Con.Open "provider=microsoft.ace.oledb.12.0;data source=" & _ dosya_yolu & ";extended properties=""excel 12.0;hdr=NO;IMEX=1""" Sorgu = "Select F10,F2,F8,F7,F12,F13,F14 from [Detay$] WHERE F1 = '" & _ babs & "' AND F3 = '" & vergino & "' ORDER BY F10"...- Haluk
- Posta #28
- Forum: Makro-VBA Soruları
-
H
ikinci kitabı kapatma hk.
...= CreateObject("DAO.DBEngine.120") On Error GoTo 0 Set DB = daoDBEngine.OpenDatabase(dosya_yolu, False, False, "Excel 8.0; HDR=No; IMEX=1;") Sorgu = "Select F10,F2,F8,F7,F12,F13,F14 from [Detay$] WHERE F1 = '" & _ babs & "' AND F3 = '" & vergino & "' ORDER BY...- Haluk
- Posta #19
- Forum: Makro-VBA Soruları
-
H
ikinci kitabı kapatma hk.
...Con.Open "provider=microsoft.ace.oledb.12.0;data source=" & _ dosya_yolu & ";extended properties=""excel 12.0;hdr=NO;IMEX=1""" Sorgu = "Select F10,F2,F8,F7,F12,F13,F14 from [Detay$] WHERE F1 = '" & _ babs & "' AND F3 = '" & vergino & "' ORDER BY F10"...- Haluk
- Posta #16
- Forum: Makro-VBA Soruları