«vba» etiketlenmiş sorular

Uygulamalar için Visual Basic; tüm Microsoft Office uygulamalarında kullanılan bir Visual Basic alt kümesi. Bu etiketi, söz konusu uygulama için etiketle birlikte kullanmayı düşünün. VBA ile ilgili iyi sorular genellikle bazı kodlar içerir ve belirli sorunların çözülmesini ister. Tüm çözümleri soran sorular (lütfen bana kodu / bunu nasıl ve VBA ile nasıl yapacağınızı verin) konu dışı ve çok geniş olarak kapatılacak.

2
VBA “like” yapması gerekeni yapmaz
Yaklaşık 2500 satırlık bir listem var ve ilk sütunda "intern" ve ardından ":" kelimelerinin bir döngüde görünüp görünmediğini kontrol etmek istiyorum (:: stajyerden sonra herhangi bir pozisyonda olabilir) Kodun önemli kısmı şuna benzer: For k = 1 To lastrowND intern = Worksheets("new Data").Cells(k, 1).Value If Not intern Like "*intern*:" Then …
3
DateDiff () yanlış cevaplar üretiyor
DateDiffİki tarih arasındaki günlerde farkı bulmak için işlevi kullanacak bir parça kod yazmaya çalışıyorum . Daha sonra bu numarayı e-tablomda nereye veri girileceğini belirlemek için kullanacağım. DateDiffFonksiyonu kullanırken problemlerle karşılaştım , bu yüzden yanlış gittiğim yerde çalışmayı denemek için, değişkenler kullanırken hala alabildiğim kadar basit oldum ama hala çalışmıyor. Karşılaştığım …
0
Bu makinede bulunamadığı için bir nesne yüklenemedi - Excel 2010
Beni sinirlendiren bir sorun var. Bir kullanıcı bu dosyaya her eriştiğinde, her zaman şu hata iletilerini alır: "Bu makinede bulunamadığı için bir nesne yüklenemedi" & "Gizli modülde hata derle: MenuUtilities2" (veya bu satırlar boyunca bir şeyler) Etrafa baktım ve excel için başlangıç ​​klasörlerinde herhangi bir dosya olup olmadığını kontrol ettim, …
2
Dizi eklemek için bir dize ayrıştırma
Diyelim ki bir hücrede uzun bir ip var A: 1/2/15 Okul Köpeği 9/20/19 B: (3 boşluklar) 1/8/16 School Cat 10/10/10 1/2/15 ve 1/8/16 yakalamak istiyorum Problem ilk dize 1 boşluk ile ayrılır, ikinci dize 3 boşluk ile ayrılır Yani benim için myStringArr = Split(myString,” “) MsgBox myStringArr(1) myStringArr(1) = 1/2/15 …
5
Bu Makroyu daha hızlı çalıştırabilir miyim? [çift]
Bu sorunun burada zaten bir cevabı var: Aynı anda birden fazla hücrede belirli bir metni nasıl silebilirim? 3 cevaplar Bu makroyu 1000'den fazla giriş için kullanıyorum. Kodun kendisi istediğim gibi çalışıyor. Option Explicit Sub DoTheThing() Dim keepValueCol As String keepValueCol = "H" Dim row As Integer row = 2 Dim …
0
Yukarıdaki hücre filtre tarafından gizlendiğinde Excel güncelleme hücresi
Etkinlik içeren bir sayfam var - etkinliğin haftanın günü ile birlikte bir sütunum Bazı günlerde hem 3 hem de 4 etkinlik var. P sütununda çift günleri filtreliyorum. Gördüğünüz gibi ben X tarafından filtrelerseniz Salı artık sıranın 3. görünür olacak, satır işaretli sadece 'X' göstermek için Sonuca filtre, ben Q üzerinde …
1
Giriş kutusuyla hücrede bulunan her bir kelimeyi ve aynı anda birden fazla kelimeyi renklendirin
Burada diğer iş parçacığından neredeyse aynı makro var . Ve şimdi, her kelimeyi kodda yazmak zorunda kalmadan, Mylist'in kodundakiyle aynı olanları yazabileceğim Inputbox'ı eklemeye çalışıyorum. Ancak, renkli sözcükler almak için her bir kelimeyi giriş kutusundan alıntı yapmakta zorluk çektim. Sadece bir kelimeyi renklendirebilirim ve her bir kelimeyi giriş kutusuna ayrı …
1
Köprü Formülünden Köprü ayıklamak için Excel VBA
Elektronik tablodaki bağlantıları doğrulamak için VBA kodu yazmaya çalışıyorum. Formülün oluşturduğu köprülerle karşılaşana kadar çalışıyorum. Örneğin =Hyperlink(A1,"Link1")veya=Hyperlink(A1&A2,"Link2") Standart Hyperlinks(1).AddressVBA bunları bağlantıya sahip olarak kaydetmez ve çevrimiçi olarak başka bir çözüm bulamıyorum. Herhangi bir fikir?
1
vba-Excel: Selenyum. Başlat çalışmıyor. Niye ya?
Bu bağlantıdan Selenyumun en son sürümünü yüklediniz: https://github.com/florentbr/SeleniumBasic/releases/latest Ben SeleniumBasic Klasörde son ChromeDriver hareket vardır: https://sites.google.com/a/ chromium.org/chromedriver/downloads "Referanslar" ta "Selenyum Tipi Kitaplığı" nı etkinleştirdim. Chrome penceresi birkaç saniye sonra kendiliğinden açılır ve kapanır: Sub StartChrome() Dim Selenium As New ChromeDriver Selenium.Start , "https://www.google.it/" End Sub Niye ya? Microsoft Office 365 …
Sitemizi kullandığınızda şunları okuyup anladığınızı kabul etmiş olursunuz: Çerez Politikası ve Gizlilik Politikası.
Licensed under cc by-sa 3.0 with attribution required.