Sorgu için arama sonuçları: workbooks.open

maalesef hata verdi

Merhaba, Aşağıdaki kodu dener misiniz? Workbooks.Open Range("FZ5").value

...As Worksheet Dim sourceRange As Range Dim columnLetter As String ' Dosya yolunu ve sayfa adını güncelleyin Set wb = Workbooks.Open("C:\Users\ibo\Documents\veri\test.xlsx") Set ws = wb.Sheets("Sayfa1") ' ComboBox'tan seçilen değeri al columnLetter =...

hocam kopyalıyor ama getirip SATIŞ a yapıştırmıyor şuan yani az önce fonksiyonları almamıştım aldım şuan hata yok ama kopyaladıklarını yapıştırmıyor sadece

...colIndex As Integer Dim targetColumn As Integer Dim i As Integer ' Dosya yolunu ve sayfa adını güncelleyin Set wb = Workbooks.Open("C:\DosyaYolu\DosyaAdi.xlsx") Set ws = wb.Sheets("SayfaAdi") Set targetWs = ThisWorkbook.Sheets("SATİS") ' ComboBox'tan seçilen...

sizi çok iyi anlıyorum ÜSTADIM bende sizin gibiyim yeni başladım hocalar çok kaliteli çok yardımcı oluyolar süper bir site burası ben şahsen çok beğeniyorum yanlız küçük birşeyi atlıyorsunuz sadece a seçildiğinde a, b seçildiğinde b, demiyorum. aşağıdan bir örnek vericem bi bakın tablodan...

...As Worksheet Dim sourceRange As Range Dim columnLetter As String ' Dosya yolunu ve sayfa adını güncelleyin Set wb = Workbooks.Open("C:\Users\ibo\Documents\veri\test.xlsx") Set ws = wb.Sheets("Sayfa1") ' ComboBox'tan seçilen değeri al columnLetter =...

...As Worksheet Dim sourceRange As Range Dim sourceRange1 As Range ' Dosya yolunu ve sayfa adını güncelleyin Set wb = Workbooks.Open("C:\Users\ibo\Documents\veri\test.xlsx") Set ws = wb.Sheets("Sayfa1") ' A sütunundaki verileri seç ve kopyala Set sourceRange =...

günaydın teşekkürler şimdi deniyorum.

...Dim wb As Workbook Dim ws As Worksheet Dim sourceRange As Range ' Dosya yolunu ve sayfa adını güncelleyin Set wb = Workbooks.Open("C:\DosyaYolu\DosyaAdi.xlsx") Set ws = wb.Sheets("SayfaAdi") ' A sütunundaki verileri seç ve kopyala Set sourceRange =...

hocam kusura bakmayın araya giriyorum bende aynı işlemler ile uğraşıyorumda burada bende bir yapı değişikliği var dosyayı seçip seçilen dosyadaki verileri başka bir xls deki sayfaya nasıl göndeririz bana o lazım konu sorunuma çok yakın oldugu için araya girmek zorunda kaldım...

..." & fileName currentFilePath = targetFolder & fileName On Error Resume Next Set wb = Workbooks.Open(Filename:=currentFilePath, Password:=filePassword) If Not wb Is Nothing Then On Error GoTo 0...

...filePath = "C:\Users\kullanıcı.adı\Documents\Excel Dosyaları\MakroDosyası.xlsm" ' Kapalı dosyayı aç Set wb = Workbooks.Open(filePath) ' Kapalı dosyadaki makro kodunu al macroCode = wb.VBProject.VBComponents("Module1").CodeModule.Lines(1...

...VBS dosyanız şu şekilde olacaktır: Dim objExcel Set objExcel = CreateObject("Excel.Application") objExcel.Visible = False objExcel.Workbooks.Open "C:\Belgeler\ExcelDosyaları\MakroDosyası.xlsm" objExcel.Run "MakroAdı" objExcel.Quit Set objExcel = Nothing Bu şekilde, VBS dosyasını...

...yazın: Set objExcel = CreateObject("Excel.Application") objExcel.Visible = False ' Excel penceresini gizle Set objWorkbook = objExcel.Workbooks.Open("C:\DosyaYolu\ExcelDosyanız.xlsm") objExcel.Run "MakroAdı" objWorkbook.Close False objExcel.Quit Set objWorkbook = Nothing Set objExcel =...

Merhaba, teşekkürler yanıtınız için ancak aynısı oldu. Şifre kaldırma işlemi tamamlandı. yazıyor ve değişen bir şey yok.

Merhaba, desteğiniz için teşekkürler. Dosya yolu ve şifreyi doğru olarak giriyorum, msgbox çalışıyor ancak şifreler kalkmadı.

...tüm Excel dosyalarını açın ve şifreyi kaldırın fileName = Dir(folderPath & "*.xlsx") Do While fileName <> "" Set wb = Workbooks.Open(folderPath & fileName, Password:=password) wb.SaveAs folderPath & "unlocked_" & fileName wb.Close fileName = Dir...

..."Sayfa 4", "Z" ' Sayfa4 için Z sütunu ' 1. Excel dosyasını aç (1. Excel dosyasının konumu belirtilmiş) Set wb1 = Workbooks.Open(ThisWorkbook.Sheets("Map").Range("A3").Value) ' 2. Excel dosyasını (mevcut dosya) tanımla Set wb2 = ThisWorkbook ' 1. Excel'deki tüm...

Emeğinize sağlık, teşekkür ederim. Ama bu seçenek çok zaman alacak. 17.8GB excell dosyam var. Hepsi de farklı klasörlerde ve farklı yerlerde. Sorunum tekrar ederse, önerinizi uygulayacağım. Teşekkürler. İyi çalışmalar.