(19/08/2021, 12:34)lemoncher2 yazdı:(19/08/2021, 11:49)Mehmet007 yazdı:(18/08/2021, 20:31)lemoncher2 yazdı:
Bu kod ile klasör oluşturabilirsiniz. Herhangi bir Buton oluşturup "Tıklandığında" olayına bunu yaptırınız.
Teşekkür ederim. Bu kod çok işime yaradı.
Private Sub klasor_adi_AfterUpdate()
MkDir CurrentProject.Path & "\" & Me.klasor_adi & "-" & Me.klasor_yil
MsgBox "Başarılı.", vbDefaultButton1 + vbInformation, "BİLGİ"
End Sub
Private Sub dosya_adi_AfterUpdate()
MkDir CurrentProject.Path & "\" & Me.dosya_adi & "-" & Me.dosya_yil
MsgBox "Başarılı.", vbDefaultButton1 + vbInformation, "BİLGİ"
End Sub
Bu şekilde klasör oluşturmak istiyorum. Fakat dosya_adi klasörünü klasor_adi klasörünün içine nasıl açtırabillirim acaba
MkDir CurrentProject.Path & "\" & Me.klasor_adi & "-" & Me.klasor_yil & "\" & Me.dosya_adi
MsgBox "Başarılı.", vbDefaultButton1 + vbInformation, "BİLGİ"
Şeklinde denermisiniz
Maalesef olmadı, hata verdi
