Note: The other languages of the website are Google-translated. Back to English

Excel'de hücrelerin veya kilitlenmemiş hücrelerin sekme sırası nasıl ayarlanır?

Kendi tanımlı hücreleriniz için sekme sırasını ayarlamanız gerektiğini varsayarsak, örneğin, Sekme tuşuna basmak B5 hücresinden C6'ya, C6'dan D7'ye, D7'den E8'e hareket edecek, ardından bir çalışma sayfasında E5 hücresinden çıkarken B8'e dönecektir. aşağıda gösterilen ekran görüntüsü gibi. Nasıl elde edilir? Bu makale sizin için bir VBA yöntemi sağlar.

VBA kodu ile hücrelerin veya kilitli hücrelerin sekme sırasını ayarlayın


VBA kodu ile hücrelerin veya kilitli hücrelerin sekme sırasını ayarlayın

Normal çalışma sayfasındaki hücrelerin sekme sırasını veya korumalı çalışma sayfasındaki kilidi kaldırılmış hücreleri ayarlamak için lütfen aşağıdaki VBA yöntemini çalıştırın.

1. Çalışma sayfasında sekme sırasını ayarlamanız, sayfa sekmesine sağ tıklamanız ve Kodu Görüntüle bağlam menüsünden.

2. içinde Uygulamalar için Microsoft Visual Basic penceresinde, aşağıdaki VBA kodunu kopyalayıp Kod pencere.

VBA kodu: Hücrelerin veya kilitsiz hücrelerin sekme sırasını ayarlayın

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim tabArray As Variant
    Dim i As Long
    tabArray = Array("B5", "C6", "D7", "E8")
    Application.ScreenUpdating = False
    For i = LBound(tabArray) To UBound(tabArray)
        If tabArray(i) = Target.Address(0, 0) Then
            If i = UBound(tabArray) Then
                Me.Range(tabArray(LBound(tabArray))).Select
            Else
                Me.Range(tabArray(i + 1)).Select
            End If
        End If
    Next i
    Application.ScreenUpdating = True
End Sub

notlar:

1) Kodda, B5, C6, D7, E8, giriş hücrelerinin sırasıdır ve hücre adresinin büyük harfini kullanmanız gerekir. Bunları ihtiyaçlarınıza göre değiştirebilirsiniz.
2) Korumalı çalışma sayfası için, giriş hücrelerinin kilidi açılmalıdır.

3. Tuşuna basın. Ara Toplam + Q kapatmak için anahtarlar Uygulamalar için Microsoft Visual Basic pencere.

Şu andan itibaren, B5'e veri girdikten sonra, imleç Tab veya Enter tuşuna basarak C6'ya gider, ardından C7'dan çıkarken D6'ye gider ve ardından mevcut çalışma sayfasında D7, E8'e geçer.


İlgili Makaleler:


En İyi Ofis Üretkenliği Araçları

Kutools for Excel Sorunlarınızın Çoğunu Çözer ve Verimliliğinizi% 80 Artırır

  • Yeniden: Hızlıca yerleştirin karmaşık formüller, grafikler ve daha önce kullandığınız her şey; Hücreleri Şifrele şifre ile; Posta Listesi Oluşturun ve e-posta gönder ...
  • Süper Formül Çubuğu (birden çok metin ve formül satırını kolayca düzenleyin); Okuma Düzeni (çok sayıda hücreyi kolayca okuyun ve düzenleyin); Filtrelenmiş Aralığa Yapıştır...
  • Hücreleri / Satırları / Sütunları Birleştirme Veri kaybetmeden; Bölünmüş Hücre İçeriği; Yinelenen Satırları / Sütunları Birleştirme... Yinelenen Hücreleri Önleyin; Aralıkları Karşılaştır...
  • Yinelenen veya Benzersiz'i seçin Satırlar; Boş Satırları Seçin (tüm hücreler boştur); Süper Bul ve Bulanık Bul Birçok Çalışma Kitabında; Rastgele Seçim ...
  • Tam kopya Formül referansını değiştirmeden Birden Çok Hücre; Otomatik Referans Oluştur Birden Çok Sayfaya; Madde İşaretleri Ekle, Onay Kutuları ve daha fazlası ...
  • Metni Çıkar, Metin Ekle, Konuma Göre Kaldır, Alanı Kaldır; Sayfalama Alt Toplamları Oluşturma ve Yazdırma; Hücre İçeriği ve Yorumları Arasında Dönüştür...
  • Süper Filtre (filtre şemalarını kaydedin ve diğer sayfalara uygulayın); Gelişmiş Sıralama ay / hafta / gün, sıklık ve daha fazlasına göre; Özel Filtre kalın, italik ...
  • Çalışma Kitaplarını ve Çalışma Sayfalarını Birleştirin; Tabloları anahtar sütunlara göre birleştirin; Verileri Birden Çok Sayfaya Bölme; Toplu dönüştürme xls, xlsx ve PDF...
  • 300'den fazla güçlü özellik. Office / Excel 2007-2021 ve 365'i destekler. Tüm dilleri destekler. Kuruluşunuzda veya kuruluşunuzda kolay devreye alma. Tam özellikler 30 günlük ücretsiz deneme. 60 günlük para iade garantisi.
kte sekmesi 201905

Office Tab, Office'e Sekmeli Arayüz Getirir ve İşinizi Çok Daha Kolay Hale Getirir

  • Word, Excel, PowerPoint'te sekmeli düzenlemeyi ve okumayı etkinleştirin, Publisher, Access, Visio ve Project.
  • Yeni pencereler yerine aynı pencerenin yeni sekmelerinde birden çok belge açın ve oluşturun.
  • Üretkenliğinizi% 50 artırır ve her gün sizin için yüzlerce fare tıklamasını azaltır!
ofis tabanı
Yorumları sıralama ölçütü
Yorumlar (14)
Henüz derecelendirme yok. İlk değerlendiren siz olun!
Bu yorum sitedeki moderatör tarafından en aza indirildi
Bu, çalışma sayfasındaki bir sonraki kilidi açılmış hücreye bir sekmeyi zorlamak için kullanılabilir mi? Örneğin, operatörün A15 hücresine veri girmesine (taramasına) ihtiyacım var ve ardından C15'e, ardından E15'e, ardından G15'e (satırın sonu) sekmeli ve ardından sonraki ilk hücreye dönmelidir. satır, A16 ve diziyi tekrarlayın. Bazı operatörler sekmeye programlanmış tarayıcılar kullandığı ve diğerleri girmeye programlandığı için bu kalıbı zorlamam gerekiyor. Teşekkürler!!
Bu yorum sitedeki moderatör tarafından en aza indirildi
Her satırdaki sekmeyi korumasız her hücreye zorlamak için aynı kodu kullanmak mümkün müdür? A15 hücresinden başlayarak sekme yapmam ve ardından bir sonraki korumasız hücreye (C15), ardından E15'e, ardından G15'e geçmem gerekiyor. Burada bir kez, A16'ya sekmem ve formun geri kalanı için işlemi tekrarlamam gerekiyor. Buna ihtiyaç duymamın nedeni, verilerin barkod tarayıcı tarafından girilmesi ve bazılarının sekmeye, bazılarının da girilecek şekilde programlanmasıdır. Bu konuda yardım için teşekkür ederiz. Spinaz
Bu yorum sitedeki moderatör tarafından en aza indirildi
Merhaba ve form denetimi etiketlerinin ve form denetimi açılır kutularının kilidinin açık olduğu ve kullanıcının sekmeye geçip bir etiketteki bilgileri doldurabileceği ve sekme yaparken sekme sırasını korumalı bir sayfada ayarlamaya yarayan VBA kodu için teşekkür ederiz. bir açılır liste, talimatların ona vereceği öğe sayısını seçin ve kodunuzla ilerleme kaydettim. İlk başta sadece etiket form kontrollerinin her biri arasında sekme yapabildim, şimdi bazen açılır listelere basıyorum. Bunu nasıl yapacağınıza dair bir turorialden gerçekten zevk alırdım.
Bu yorum sitedeki moderatör tarafından en aza indirildi
Listelediğiniz sırayla excel, VBA kodu olmadan yapar. Geriye gitmelerini sağlayın, o zaman bir şey elde edersiniz.
Bu yorum sitedeki moderatör tarafından en aza indirildi
İlk önce korumasız olmasını istediğiniz hücreleri seçin.

Sayfanızı koruduğunuzda, sekme sırasını korumasız hücrelerinize göre otomatik olarak ayarlayacaktır. Soldan Sağa ve Yukarıdan Aşağıya Sekme yapacaktır; Shift+Tab Sağdan Sola ve Alttan Yukarıya.
Bu yorum sitedeki moderatör tarafından en aza indirildi
Sevgili Evan,
Paylaşım için teşekkürler.
Bu yorum sitedeki moderatör tarafından en aza indirildi
Giriş sırasındaki kod için teşekkürler. Barkod bilgilerini girerek bir elektronik tablo üzerinde çalışıyorum ve 300 hücreye kadar yayılmam gerekiyor ve program yalnızca 142 hücre girmeme izin veriyor. 300'e kadar çıkabilmem için daha fazlasını eklemenin bir yolu var mı?



Teşekkürler
Bu yorum sitedeki moderatör tarafından en aza indirildi
Merhaba Jeanne,
Yorumun için teşekkürler.
Ancak kod, ihtiyaçlarınızı karşılayacak şekilde optimize edilemez. Bunun için üzgünüm.
Bu yorum sitedeki moderatör tarafından en aza indirildi
No me funcionó, lo coloqué en la hoja de trabajo, debe haber algún error, me podrían ayudar, necesito applicationarlo en mi trabajo,

Atte,

Collins Neptali Arráiz López
Bu yorum sitedeki moderatör tarafından en aza indirildi
Merhaba, hiçbir şey girmeden sadece enter tuşuna basıp bir sonraki seçime gitmenin bir yolu var mı?
Bu yorum sitedeki moderatör tarafından en aza indirildi
Merhaba, Yeni burada VBA kodu, bir Pull Down Box'a basana kadar çalışır, seçimimi yaparken ilk gelene geçer, Tab'a basar ve kilitli bir hücreye gider, Herhangi bir veri girmediğim bir hücre gibi davranır. Herhangi öneriler? GlennD24
Bu yorum sitedeki moderatör tarafından en aza indirildi
Olá, o código VBA para tanımlı bir ordem das células desejadas funcionou perfeitamente. Eu percebi que para que ele funcione, é gerekli entrar com um dado ve сélula e pressionar TAB ou ENTER.
PERGUNTA: Şu anda en çok arananlar arasında celulas (31 no meu caso sao XNUMX, sendo algumas vazias e outras com valores padrão) sömestr que entrar com dados nelas, Somente pressionando TAB ou ENTER. Tüm dünyada geçerli olan en önemli veriler, en iyiler, en iyiler, en doğru girişler ve daha fazlası için geçerlidir.

Google Çevirmen tarafından çevrilen metin
Merhaba, istenen hücrelerin sırasını ayarlamak için VBA kodu mükemmel çalıştı. Çalışması için hücreye veri girmek ve TAB veya ENTER tuşuna basmak gerektiğini anladım.
SORU: Bu kodun tüm hücrelerden geçmesini sağlayabilirsiniz (benim durumumda 31 tane var, bazıları boş ve diğerleri varsayılan değerlere sahip) bunlara veri girmek zorunda kalmadan, sadece SEKME veya ENTER tuşuna basarak. Bazı boş hücrelere ve değerlere sahip diğer hücrelere sahip olduğum için, varsayılan olarak hepsine tekrar veri girmek zorunda kalmadan hücreler arasında geçiş yapmak istiyorum, ancak yalnızca değiştirmem gereken hücreleri değiştirmek istiyorum.att

Bu yorum sitedeki moderatör tarafından en aza indirildi
Kodunuzu çalışma sayfama kopyaladım, ancak kapatıp tekrar kullanmak için yeniden açtığımda kod gitti. Bunu nasıl kaydederim?
Bu yorum sitedeki moderatör tarafından en aza indirildi
Merhaba Anita,
VBA kodunu özellik kullanımı için saklamak istiyorsanız, VBA kodunu ekledikten sonra çalışma kitabınızı Excel Makro etkin çalışma kitabı aşağıdaki ekran görüntüsünde gösterildiği gibi. Ardından yeni kaydedilen dosyayı gelecekte kullanın.
https://www.extendoffice.com/images/stories/comments/comment-picture-zxm/Excel_macro-enabled_workbook.png
Buraya henüz hiç yorum yapılmamış
Lütfen yorum yazın
Misafir olarak yayınlama
×
Bu gönderiyi değerlendirin:
0   Karakterler
Önerilen Konumlar

Bizi takip et

Telif Hakkı © 2009 - www.extendoffice.com. | Tüm hakları Saklıdır. Tarafından desteklenmektedir ExtendOffice. | | | Site Haritası
Microsoft ve Office logosu, Microsoft Corporation'ın Amerika Birleşik Devletleri ve / veya diğer ülkelerdeki ticari markaları veya tescilli ticari markalarıdır.
Sectigo SSL ile korunmaktadır