merhaba arkadaşlar
belge açılışında kullanıcının doğru olup olmadığını kontrol etmesini istediğim ve sizlerin yardımıyla elde ettiğim aşağıdaki kod çalışmadı. sorun ne olabilir acaba.
Private Sub Workbook_Open()
If Application.UserName = "x32" Then
Sheets("Sayfa1").Select
Else
MsgBox "olmaz", , "dikkat"
Application.Quit
End If
End Sub
belge açılışında kullanıcının doğru olup olmadığını kontrol etmesini istediğim ve sizlerin yardımıyla elde ettiğim aşağıdaki kod çalışmadı. sorun ne olabilir acaba.
Private Sub Workbook_Open()
If Application.UserName = "x32" Then
Sheets("Sayfa1").Select
Else
MsgBox "olmaz", , "dikkat"
Application.Quit
End If
End Sub