Personel & Zimmet Takip Programı (KZT-v.5) foruma eklenmiştir. 
http://www.excelce.net/forum/index.php?topic=1676.0

Gönderen Konu: Genel Bir-kaç Makro Sorusu  (Okunma sayısı 10817 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı orhanacan

  • Excelce Onbaşı
  • **
  • İleti: 51
  • Puan +2/-0
  • Cinsiyet: Bay
  • Excel'den Daha Fazlası!..
    • webizci
  • Ad Soyad: orhan acan
  • İl / İlçe: ankara
  • Mesleğiniz: memur
Genel Bir-kaç Makro Sorusu
« : 01 Nisan 2011, 23:40:18 »
Merhabalar,

O kadar sorulacak soru var ki, acaba her soruya yeni konu açmaktan ziyade, merak edilen ve bilinmeyen genel bir-kaç konu hakkında bilgi verebilir misiniz?

1. Çalışma sayfasında vba sayfasından xlSheetHidden seçildiğinde köprü ve butonla gizlenen sayfaya gitme işlemi olmuyor mu? Ki ben, yaptığım uygulamada yapamadım. Eğer olmuyorsa, bunun çözümünde kodlamamı yoksa başka bir işleme ihtiyaç var mı?

2. Çalışma sayfasında bazı makrolar bazen işlem yapıyor, bazen yapmıyor. İşlem yapmadığı zaman çalışma kitabını açıp-kapattığımda sorun çözülüyor. Neden? bu sorun oluşur. bunun çözümü var mı?

3. Hocam, sadece xxx çalışma kitabında menü+araç çubukları (kaydırma çubukları hariç) kaldırmak için ne yapabiliriz? Kullandığım kodlamada sadece istediğim excell çalışma kitabı değil, tüm excell çalışma kitaplarında kodlar uygulandı. Ben, bunun sadece bir çalışma kitabında, uygulamamda işlem görmesini istiyorum. Bu konuda nasıl bir kodlama uygulayabiliriz?

4. Üstadım, excel uygulamanın açılışında kullanıcı giriş formuyla şifreli giriş mevcut. Fakat; uygulamaya tıkladığınızda 1 sn altında çalışma kitabının sayfası biran gözüküp hemen şifreli giriş formu gelmekte. Ben, direkt olarak giriş formunun gelmesini, excel sayfasının hiç gözükmemesini istiyorum. Bir yerde hata mı mevcut? veya bu sorunu nasıl çözebiliriz?

Arkadaşlar, soruları maddeler halinde yazdım, umarım sizi meşgul etmez. Bu konularda çözüm yollarını sunarsanız memnun olurum. Saygılarımla...
« Son Düzenleme: 02 Nisan 2011, 08:27:50 Gönderen: Bülent Öztürk »

Çevrimdışı Bülent Öztürk

  • Excelce.Net Yönetici
  • *
  • İleti: 1411
  • Puan +19/-0
  • Cinsiyet: Bay
  • Türkçe Konuşup Excelce Yazıyoruz...
    • Bülent Öztürk
  • Ad Soyad: Bülent Öztürk
  • Doğum Yılınız: 1976
  • İl / İlçe: İstanbul / Çorlu
  • İşletim Sisteminiz: Win.10
  • Mesleğiniz: Bilgi Teknolojileri
  • Office Versiyonunuz: 2016
Ynt: Genel Bir-kaç Makro Sorusu
« Yanıtla #1 : 02 Nisan 2011, 08:40:34 »
Merhaba Orhan Bey.

1. Çalışma sayfasında vba sayfasından xlSheetHidden seçildiğinde köprü ve butonla gizlenen sayfaya gitme işlemi olmuyor mu? Ki ben, yaptığım uygulamada yapamadım. Eğer olmuyorsa, bunun çözümünde kodlamamı yoksa başka bir işleme ihtiyaç var mı?
Gizli sayfalar köprü ile açılmaz, kodlama gerektirir.

2. Çalışma sayfasında bazı makrolar bazen işlem yapıyor, bazen yapmıyor. İşlem yapmadığı zaman çalışma kitabını açıp-kapattığımda sorun çözülüyor. Neden bu sorun oluşur? Bunun çözümü var mı?
Muhtemelen "Application.EnableEvents=False" komut satırı ile sayfa olayları engellenmiş şekilde kalıyor olabilir.
Yine de kesin bir şey söylemek için dosyayı görmek daha iyi olur.

3. Sadece xxx çalışma kitabında menü+araç çubukları (kaydırma çubukları hariç) kaldırmak için ne yapabiliriz? Kullandığım kodlamada sadece istediğim excel çalışma kitabı değil, tüm excel çalışma kitaplarında kodlar uygulandı. Ben, bunun sadece bir çalışma kitabında, uygulamamda işlem görmesini istiyorum. Bu konuda nasıl bir kodlama uygulayabiliriz?
Kullandığınız kodları uygulamak istediğiniz dosyanın Workbook_Activate olayına, dosya haricinde etkili olmamaları için de Workbook_Deactivate olayına iptal için olanları yazınız.

4. Excel uygulamanın açılışında kullanıcı giriş formuyla şifreli giriş mevcut. Fakat; uygulamaya tıkladığınızda 1 sn altında çalışma kitabının sayfası biran gözüküp hemen şifreli giriş formu gelmekte. Ben, direkt olarak giriş formunun gelmesini, excel sayfasının hiç gözükmemesini istiyorum. Bir yerde hata mı mevcut? Bu sorunu nasıl çözebiliriz?
Şu şekilde deneyin;
Kod: [Seç]
Private Sub Workbook_Open()
Application.Visible = False
UserForm1.Show
End Sub
(Ücretli program talepleriniz için iletişime geçebilirsiniz, excelvbprogram@gmail.com)

Çevrimdışı orhanacan

  • Excelce Onbaşı
  • **
  • İleti: 51
  • Puan +2/-0
  • Cinsiyet: Bay
  • Excel'den Daha Fazlası!..
    • webizci
  • Ad Soyad: orhan acan
  • İl / İlçe: ankara
  • Mesleğiniz: memur
Ynt: Genel Bir-kaç Makro Sorusu
« Yanıtla #2 : 02 Nisan 2011, 11:41:31 »
Bülent hocam, verdiğiniz bilgiler için teşekkür ederim. Lütfen..! çok zor şartlarda verdiğiniz yardımlar konusunda özverinizi kaybetmeyin. Siz ve sizin gibi bilgi paylaşımında bulunan ve insanına hizmet edenlere ihtiyacımız var. Saygı ve Sevgilerimle...
« Son Düzenleme: 02 Nisan 2011, 11:57:12 Gönderen: orhanacan »

Çevrimdışı orhanacan

  • Excelce Onbaşı
  • **
  • İleti: 51
  • Puan +2/-0
  • Cinsiyet: Bay
  • Excel'den Daha Fazlası!..
    • webizci
  • Ad Soyad: orhan acan
  • İl / İlçe: ankara
  • Mesleğiniz: memur
Ynt: Genel Bir-kaç Makro Sorusu
« Yanıtla #3 : 02 Nisan 2011, 19:58:30 »
Hocam, sunduğunuz çözümlerde 3 üncü madde de geçen . sadece kodun yazıldığı uygulamada geçerli olacak, xxx çalışma kitabında açılışta uygulama menü+araç çubukları (kaydırma çubukları hariç) kaldırmak konusundaki çözümü uygulayamadım. Acaba, açıklayıcı kodlamayı yazabilir misiniz? Kod nasıl ve nereye ekleyeceğiz? saygılar...
« Son Düzenleme: 02 Nisan 2011, 23:47:43 Gönderen: orhanacan »

Çevrimdışı Bülent Öztürk

  • Excelce.Net Yönetici
  • *
  • İleti: 1411
  • Puan +19/-0
  • Cinsiyet: Bay
  • Türkçe Konuşup Excelce Yazıyoruz...
    • Bülent Öztürk
  • Ad Soyad: Bülent Öztürk
  • Doğum Yılınız: 1976
  • İl / İlçe: İstanbul / Çorlu
  • İşletim Sisteminiz: Win.10
  • Mesleğiniz: Bilgi Teknolojileri
  • Office Versiyonunuz: 2016
Ynt: Genel Bir-kaç Makro Sorusu
« Yanıtla #4 : 04 Nisan 2011, 08:28:15 »
Kullandığınız kod nedir ve hangi olay altına yazdınız, paylaşır mısınız?
(Ücretli program talepleriniz için iletişime geçebilirsiniz, excelvbprogram@gmail.com)

Çevrimdışı orhanacan

  • Excelce Onbaşı
  • **
  • İleti: 51
  • Puan +2/-0
  • Cinsiyet: Bay
  • Excel'den Daha Fazlası!..
    • webizci
  • Ad Soyad: orhan acan
  • İl / İlçe: ankara
  • Mesleğiniz: memur
Ynt: Genel Bir-kaç Makro Sorusu
« Yanıtla #5 : 04 Nisan 2011, 20:44:47 »
Hocam, saygılar... sanırım sorunun anlatımında hata yaptım. Çalıştığım Excell çalışma kitabında menü ve araç çubuklarını ortadan kaldırmak için kod olayından bahisle sadece çalıştığım kitap için geçerli olacak menü ve araç çubuklarını kaldırmak istiyorum. Bu konuda gerekli kodlama konusunda çözüm istemiştim. Kusura bakmayın, hayırlı akşamlar...
« Son Düzenleme: 04 Nisan 2011, 21:48:17 Gönderen: orhanacan »

Çevrimdışı Bülent Öztürk

  • Excelce.Net Yönetici
  • *
  • İleti: 1411
  • Puan +19/-0
  • Cinsiyet: Bay
  • Türkçe Konuşup Excelce Yazıyoruz...
    • Bülent Öztürk
  • Ad Soyad: Bülent Öztürk
  • Doğum Yılınız: 1976
  • İl / İlçe: İstanbul / Çorlu
  • İşletim Sisteminiz: Win.10
  • Mesleğiniz: Bilgi Teknolojileri
  • Office Versiyonunuz: 2016
Ynt: Genel Bir-kaç Makro Sorusu
« Yanıtla #6 : 05 Nisan 2011, 08:18:42 »
Kullandığınız kodları sormuştum ama ısrarla vermek istemediniz!
Örnek kodları ben vereyim o zaman...

ThisWorkbook olayına yazılacak;

'Çalışma kitabı aktif olduğunda özel menü oluşacak:
Kod: [Seç]
Private Sub Workbook_Activate()
Rem www.excelce.net/forum - Bülent Öztürk
Dim excelcenet_menu As CommandBarControl
On Error Resume Next
Application.CommandBars.FindControl(, , "E&xcelce.Net", False).Delete
Set excelcenet_menu = Application.CommandBars(1).Controls.Add(msoControlButton, , , , True)
With excelcenet_menu
    .Style = msoButtonIconAndCaption
    .FaceId = 566
    .Caption = "E&xcelce.Net"
    .Tag = "E&xcelce.Net"
    .BeginGroup = True
    .OnAction = "ExcelceMesaj"
End With
End Sub

'Çalışma kitabı pasif olduğunda özel menü silinecek:
Kod: [Seç]
Private Sub Workbook_Deactivate()
On Error Resume Next
Application.CommandBars.FindControl(, , "E&xcelce.Net", False).Delete
End Sub

'Bir modüle yazılacak kodlar:
Kod: [Seç]
Sub ExcelceMesaj()
MsgBox "Excelce.Net Özel Menüye Tıkladınız!", vbInformation, Application.UserName
End Sub
(Ücretli program talepleriniz için iletişime geçebilirsiniz, excelvbprogram@gmail.com)

Çevrimdışı orhanacan

  • Excelce Onbaşı
  • **
  • İleti: 51
  • Puan +2/-0
  • Cinsiyet: Bay
  • Excel'den Daha Fazlası!..
    • webizci
  • Ad Soyad: orhan acan
  • İl / İlçe: ankara
  • Mesleğiniz: memur
Ynt: Genel Bir-kaç Makro Sorusu
« Yanıtla #7 : 05 Nisan 2011, 21:11:44 »
Hocam, teşekkür ederim. Uygulamamı sayenizde sonuca ulaştırdım. Acizane uygulamamı yardıma ihtiyacı olup, kullanacak çok arkadaş var. Sizi meşgul etmeyeyim. İhtiyaç durumunda sorunlarımla tekrar sizleri rahatsız edersem kusura bakmayın. Yanlış anlaşılmasın, bir yere gitmiyorum, buradayım.  :cicek1 Saygı ve Sevgilerimle, esen kalın...
« Son Düzenleme: 05 Nisan 2011, 22:04:17 Gönderen: orhanacan »