Excel'de başka bir çalışma kitabını açmak için bir düğme nasıl eklenir?
Bir çalışma sayfasına, başka bir çalışma kitabına bağlanan bir köprü ekleyebilir ve onu hızlıca, kolayca açabilirsiniz. Peki, başka bir çalışma kitabını Geçerli Çalışma Kitabı üzerinden açmak için bir düğme oluşturmayı denediniz mi?
Başka bir çalışma kitabını açmak için VBA koduyla bir düğme uygulayın
Başka bir çalışma kitabını açmak için VBA koduyla bir düğme uygulayın
Excel'de bir şekil düğmesi ekleyip ardından bu düğmeye kod atayabilirsiniz. Bu görevi aşağıdaki adımları izleyerek kolayca tamamlayabilirsiniz:
1. Ekle > Şekiller > Dikdörtgen seçeneğine tıklayın; ekran görüntüsüne bakın:

2. Ardından, ihtiyaçlarınıza göre biçimlendirebileceğiniz bir şekil düğmesini fareyle sürükleyerek çizin; ekran görüntüsüne bakın:

3. Ardından, ALT + F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın.
4. Ekle > Modül’e tıklayın, ardından aşağıdaki kodu Modül penceresine yapıştırın.
VBA kodu: Belirli bir çalışma kitabını açma:
Sub Openworkbook_Click()
'Updateby Extendoffice
Dim xWb As Workbook
Dim wbName As String
On Error Resume Next
Set xWb = Workbooks.Open("C:\Users\DT168\Desktop\test\Book2.xlsx")
wbName = xWb.Name
If Err.Number <> 0 Then
MsgBox "This workbook does not exist!", vbInformation, "Kutools for Excel"
Err.Clear
Else
MsgBox "This workbook is opened!", vbInformation, "Kutools for Excel"
End If
End Sub
Not: Yukarıdaki kodda, Dosya Yolu ve adı kısmını C:\Users\DT168\Desktop\test\Book2.xlsxbağlamak istediğiniz çalışma kitabının gerçek yoluyla değiştirmelisiniz.
5. Ardından, bu kod penceresini kapatmak için Kaydet ve Kapat seçeneğine tıklayın. Oluşturduğunuz şekil düğmesine sağ tıklayıp bağlam menüsünden Makroyu Ata seçeneğini seçin. Açılan Makroyu Ata iletişim kutusunda, az önce eklediğiniz makronun adı olan Openworkbook_Click öğesini seçin ve ardından TAMAM düğmesine tıklayın. Ekran görüntüsüne bakın:

6. Artık şekil düğmesine tıkladığınızda:
(1.) Çalışma kitabı mevcut değilse, aşağıdaki uyarı kutusu görüntülenir:

(2.) Çalışma kitabı mevcutsa, hemen açılacak ve aynı zamanda size hatırlatmak için bir uyarı kutusu da açılacaktır:


KUTOOLS AI ile Excel'in Sihirli Gücünü Açığa Çıkarın
- Akıllı Yürütme: Hücre işlemlerini gerçekleştirin, verileri analiz edin ve hepsi basit komutlarla çalışan grafikler oluşturun.
- Özel formüller: İş akışlarınızı kolaylaştırmak için özelleştirilmiş formüller oluşturun.
- VBA Kodlama: VBA kodlarını zahmetsizce yazın ve uygulayın.
- Formül Yorumlama: Karmaşık formülleri kolayca çözmek artık çok daha basit!
- Metin Çevirisi: Elektronik tablolarınızda dil bariyerlerini aşın.
En İyi Office Üretkenlik Araçları
Excel becerilerinizi Kutools for Excel ile geliştirin ve verimlilikte hiç yaşamadığınız bir deneyim yaşayın.Kutools for Excel, üretkenliği artırmak ve Zamanı Kaydet için 300’den fazla gelişmiş özelliğe sahiptir.İhtiyacınız olan özelliği hemen edinmek için buraya tıklayın…
Office Tab, Office uygulamalarına sekmeli bir arayüz kazandırarak işlerinizi çok daha kolay hale getirir.
- Word, Excel, PowerPoint, Publisher, Access, Visio ve Project'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
- Belgeleri yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açıp oluşturun.
- Günlük üretkenliğinizi %50 artırır ve her gün yüzlerce fare tıklamasından tasarruf etmenizi sağlar!
Tüm Kutools eklentileri — tek bir kurulum dosyasında!
Kutools for Office paketi, Excel, Word, Outlook ve PowerPoint eklentilerini ve ayrıca Office Tab Pro’yu içeren kapsamlı bir çözümdür; Office uygulamalarında çalışan ekipler için idealdir.
- Hepsi bir arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
- Tek kurulum, tek lisans— birkaç dakikada hazır (MSI uyumlu)
- Birlikte daha iyi çalışır— Office uygulamalarında akıcı üretkenlik
- 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
- En iyi fiyat performans— ayrı ayrı eklenti satın almaya göre tasarruf sağlar