Follow along with the video below to see how to install our site as a web app on your home screen.
Not: This feature may not be available in some browsers.
DİKKAT !
Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak Dosya Yükleme tamamen ücretsizdir.
Güncel olmayan bir tarayıcı kullanıyorsunuz. Bunu veya diğer web sitelerini doğru şekilde göstermeyebilir. Yükseltmeli veya bir alternatif kullanmalısınız. tarayıcı.
Arkadaşlar merhaba
Bir dosyamda kullandığım;
Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo bitti
Dim Sayfa As String
satt = Target.Row
If ActiveSheet.Name <> "ÇALIŞAN" Then
Sheets("ÇALIŞAN").Select
Else
Sayfa = Target.Value
If Not SayfaVarMi(Sayfa) Then
If...