XL2000: nasıl duraklatıldı bir Visual Basic yordamı Benzet

Makale numarası: 213745 - Bu makalenin geçerli olduğu ürünleri görün.
Hepsini aç | Hepsini kapa

Özet

Microsoft Excel'deki bir makroyu duraklatmak için yerleşik bir yöntem yoktur. Bu makalede, kullanıcı girişini izin vermek için makroyu duraklatmak ve kullanıcı düğmeyi tıklattığında sonra devam etmeden bir yöntem anlatılır.

Daha fazla bilgi

Microsoft, programlama örneklerini yalnızca gösterim amacıyla sağlar; satılabilirlik ve/veya belirli bir amaca uygunluk da dahil, ancak bununla sınırlı olmamak kaydıyla, örtülü veya açık garanti vermez. Bu makale, gösterilen programlama dilini ve yordamları oluşturmak ve hata ayıklamak amacıyla kullanılan araçları kullanmayı bildiğinizi varsayar. Microsoft destek uzmanları, belirli bir yordamın işlevselliğinin açıklanmasına yardımcı olabilir, ancak gereksinimlerinizi karşılamaya yönelik olarak ek işlevsellik sağlamak veya yordamlar geliştirmek amacıyla bu örnekleri değiştirmezler.
Programlama deneyiminiz kısıtlıysa, bir Microsoft Sertifikalı İş Ortağı'na veya Microsoft Danışmanlık Hizmetleri'ne başvurabilirsiniz. Daha fazla bilgi için şu Microsoft Web sitelerini ziyaret edin:

Microsoft Partner - https://partner.microsoft.com/global/30000104 Onaylandı

Microsoft danışma belgesi Hizmetleri - http://support.microsoft.com/gp/advisoryservice

Kullanılabilir destek seçenekleri ve Microsoft'a başvurma konusunda daha fazla bilgi için aşağıdaki Microsoft Web sitesini ziyaret edin: http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMSKullanıcı girişi duraklatır ve kullanıcının bir düğmesini tıklattıktan sonra sonra devam eder bir makro oluşturmak için <a0></a0>, aşağıdaki adımları izleyin:
  1. Tüm açık çalışma kitaplarını kaydetmek kapatın ve sonra da yeni bir çalışma kitabını açın.
  2. Visual Basic Düzenleyicisi'ni (ALT + F11 tuşlarına basın) başlatın.
  3. Ekle menüsünden modülü ' nü tıklatın.
  4. Aşağıdaki yordamlar Module1 için kodu penceresine yapıştırın veya yazın:
    Sub CreatePauseToolbar()
    
        Dim NewBar As Object
    
        'Creates the toolbar, and sets a variable to easily format it
        Set NewBar = CommandBars.Add
    
        With NewBar
    
            'Sets the toolbar's name
            .Name = "Pause"
    
            'Makes the toolbar visible
            .Visible = True
    
            'Adds a button to the toolbar
            .Controls.Add Type:=msoControlButton
    
            With .Controls(1)
    
                'Sets the style of the button to text only
                .Style = msoButtonCaption
    
                'Sets the caption of the button
                .Caption = "Continue"
    
                'Assigns the macro PartTwo to the button
                .OnAction = "PartTwo"
    
            End With
        End With
    End Sub
    
    Sub PartOne()
    
        'Prompt the user to select a range
        MsgBox "Select the Border Range, then" & Chr(13) & _
            "click the Continue button."
    
        'Run the procedure that creates the toolbar
        CreatePauseToolbar
    
    End Sub
    
    Sub PartTwo()
    
        'Applies the border to the selected range
        Selection.BorderAround Weight:=xlThick
    
        'Deletes the Pause toolbar
        CommandBars("Pause").Delete
    
    End Sub
    					
  5. Kapat ve Microsoft Excel'e dönDosya menüsünde'ı tıklatın.
  6. Araçlar menüsünden, makro ' nun üzerine gelin ve makrolar ' ı tıklatın. Makro iletişim kutusundaki PartOne ' ı tıklatın ve sonra da <a2>Çalıştır</a2>'ı tıklatın.

    PartOne yordamı bir hücre aralığı seçmenizi ister.
  7. Tamam ' ı tıklatın.

    PartOne yordamı pause araç oluşturur ve görünür hale getirir CreatePauseToolbar yordamı çağırır.
  8. Sayfa1 hücre aralığını seçin.
  9. Pause</a0> araç çubuğunda <a2>devam</a2> düğmesini tıklatın. Devam düğmesi tıklatıldığında, geçerli seçime bir dış kenarlık uygular ve pause araç siler PartTwo yordamı çağırır.
Not: Bu örnekte, makro eylemi PartOne yordamının sonunda durdurulur. Sonuç olarak, PartTwo yordamını çalıştırmadan önce PartOne yordamda bildirilen tüm yordam düzeyi değişkeni değerleri kaybedersiniz.

Referanslar

Bu makaledeki kod örneğini kullanma hakkında daha fazla bilgi için, Microsoft Bilgi Bankası'ndaki makaleyi görüntülemek üzere aşağıdaki makale numarasını tıklatın:
212536OFF2000: Nasıl Knowledge Base makalelerini örnek kod Çalıştır
Yaşam süresini değişkenleri hakkında ek bilgi için Microsoft Knowledge Base'deki makaleyi görüntülemek üzere aşağıdaki makale numarasını tıklatın:
141693XL: Kapsamını değişkenleri Visual Basic for Applications
Araç çubukları, Visual Basic Düzenleyicisi'nde hakkında daha fazla bilgi için Yardım menüsünde Microsoft Visual Basic Yardımı ' nı tıklatın, ekleme ve araç çubuklarını değiştirme, Office Yardımcısı'na veya Yanıt Sihirbazı'nı yazın ve sonra döndürülen konuları görüntülemek için Ara ' yı tıklatın.

Özellikler

Makale numarası: 213745 - Son Gözden Geçirme: 23 Kasım 2006 Perşembe - Gözden geçirme: 3.5
Bu makaledeki bilginin uygulandığı durum:
  • Microsoft Excel 2000 Standard Edition
Anahtar Kelimeler: 
kbmt kbdtacode kbhowto kbprogramming kbui KB213745 KbMttr
Otomatik Tercüme
ÖNEMLİ: Bu makale, bir kişi tarafından çevrilmek yerine, Microsoft makine-çevirisi yazılımı ile çevrilmiştir. Microsoft size hem kişiler tarafından çevrilmiş, hem de makine-çevrisi ile çevrilmiş makaleler sunar. Böylelikle, bilgi bankamızdaki tüm makalelere, kendi dilinizde ulaşmış olursunuz. Bununla birlikte, makine tarafından çevrilmiş makaleler mükemmel değildir. Bir yabancının sizin dilinizde konuşurken yapabileceği hatalar gibi, makale; kelime dağarcığı, söz dizim kuralları veya dil bilgisi açısından yanlışlar içerebilir. Microsoft, içeriğin yanlış çevrimi veya onun müşteri tarafından kullanımından doğan; kusur, hata veya zarardan sorumlu değildir. Microsoft ayrıca makine çevirisi yazılımını sıkça güncellemektedir.
Makalenin İngilizcesi aşağıdaki gibidir:213745

Geri Bildirim Ver