Yardımlarınız için çok teşekkür ederim. Ancak sorunum tam olarak çözülmedi. Klasör açmadan önce başka bir butonla her defasında yeni bir adla klasör oluşturuyorum. Klasör aç dediğimde bu dosyanın açılmasını istiyorum.

Private Sub Komut99_Click()
Dim Foldername As String
Foldername = "C:\Users\Ahmet\Desktop\2020 - 2021" & Me.MKKlasorYolu.Value
Shell "C:\WINDOWS\explorer.exe """ & Foldername & "", vbNormalFocus
End Sub


bunu nasıl tanımlayabilirim

---

Klasör oluşturma ile ilgili olarak şu konuda yardımcı olabilir misiniz?

Butona bastığımda öğrenci adı ve soyadını birleştirerek bir klasör oluşturuyorum. Bunda sorun yok. Ama bu adla bir klasör varsa "bu klasör zaten var" mesajını vermesini istiyorum. Şu an klasör oluşturuyor ancak tekrar butona tıkladığımda hata mesajı veriyor.

MkDir CurrentProject.Path & "\" & Me.Öğrenci_Adı & " " & Me.Öğrenci_Soyadı

MsgBox ("Klasör oluşturuldu"), vbInformation, "KLASÖR OLUŞTURMA"