Bilgisayar kullanıcıları vba

1

Stil devralmayı sıfırlamak için VBA kullanın (Word 2013)

Bu soruyu tekrar gözden geçirmek isterim - Stili ayarlamayı stilden kalıtsal ortama doğru atama - çünkü verilen ve oylanan cevap gerçekten yapmak istediğim şeyi yapmaz. Word'deki bir stil, temel aldığı stilden çeşitli özellikleri devralabilir. Bununla birlikte, yeni stilin herhangi bir özelliğini değiştirmek mirasa zarar verir; yani temel stilde yapılan değişiklikler …

1 microsoft-word vba styles

1

Yalnızca Görünür Hücreleri Otomatik Olarak Kopyala

Otomatik olarak deniyorum. bir sayfadan diğerine bir değer sütunu kopyalayın ancak yalnızca görünür hücreleri göstermesini istiyorum. Böylece filtreyi değiştirdiğimde, diğer sayfada kopyalanan ürün otomatik olarak değişir.

1 microsoft-excel vba

1

VBA kullanarak metin dosyasının ikinci satırından nasıl okunur

Verileri bir CSVdosyaya yazmak için bir metin dosyasının ikinci satırından okumak istiyorum . Bunu yapmanın en iyi yolu nedir? Open InputFile For Input As #1 Open OutputFile For Output As #2 Do Until EOF(1) Line Input #1, strData 'Read data from second line of text file and Write into CSV …

1 microsoft-excel vba

1

Yazı tipi biçimlendirmesinin karşısında

Bir yere, italik olarak da adlandırılan ve italik olarak da adlandırılan, seçilen metne uygularken, her bir karakterin değerinin zıt olarak değişeceği şekilde biçimlendiren bir seçenek gördüğümü hatırlıyorum. karakterler italik olmayan karakterlere dönüşür. Örneğin, uygulayarak “... ve seni gerçekten seviyorum Sam.” çıktı üretmek “... ve seni gerçekten seviyorum Sam. ” Bolding …

1 microsoft-word vba unicode find-and-replace text-formatting

1

Seçilmiş bir aralıktaki İsimleri Standartlaştırmak için Excel VBA

Ben hem bu forumlarda hem de mükemmel bir acemiyim ve bir kullanıcının bir metin girişleri sütunu güncellemesine izin verecek kodu bir araya getirmeye çalışıyorum. Temel olarak yapmaya çalıştığım şey: kullanıcıdan aralığı seçmesini isteyin Aralıktaki ilk hücreden başlayın ve kodu temel alarak metni güncelleyin. bu hücrede bulunan metni "temiz" metinle değiştir …

1 microsoft-excel vba find-and-replace range

1

Metin Stili VBA makrosu MS Word'lü Numaralı Listeyi Sıfırla

Excel'den bir Word belgesi oluşturmak için bir VBA makrosu yapmaya çalışıyorum ... Şu anda Listeleri doğru bir şekilde ayarlamakta sorun yaşıyorum. Liste başlıklarının 2 başlık tipime bağlı olmasını istiyorum. Bunun gibi: 1. Header1 1.1. Header2 2. Header1 2.1 Header2 Sorun, seviye 2 listemin .ResetOnHigher özelliğini eklemiş olmama rağmen sıfırlanmamasıdır. Bu, …

1 microsoft-excel microsoft-word vba macros

0

Microsoft VBA Editör: diğer klavye kısayollarını atama

Microsoft VBA Editöründe (Excel, Word, vb.) Belirli sık eylemler için bir dizi klavye kısayolu vardır; örneğin, "Adım adım hata ayıklama için adım adım prosedür" için "F8". Bu eylemlere ve özellikle F8'e, bazı diğer kısayollara atamak istiyorum, çünkü tam olarak F8 sistemimde VBA programlamasına paralel olarak çalışması gereken farklı bir şey …

1 microsoft-excel microsoft-word vba

1

Excel'de yapılandırılmamış sayı bloklarının toplanması

Aşağıdaki genel biçimde bir veri sütunum var: 2000 1000 500 300 1500 c a 1000 1500 1250 3000 4000 6500 3000 1000 1000 1000 f 4500 1500 3000 3000 2000 Her bir “blok” içerisindeki girişlerin sayısı, bloklar arasındaki boşlukların sayısı veya bloklar arasındaki sayısal olmayan karakterlerin sayısı yoktur. Yapabilmek istediğim …

1 microsoft-excel worksheet-function vba

1

Outlook 2013'te VBA Komut Dosyası Çalıştırma

Bir toplantı davetinde bir posta listesini alfabetik olarak sıralamak için iyi bir VBA kodum varsa, Outlook 2013'te nasıl uygularım? Bunu yapıştırmak için bir yer var mı ve belki de yapıştırdıktan sonra otomatik olarak çalışacak mı? Ayrıca, bunu oluşturduğum her davetiyeye yapıştırmam gerekir mi, yoksa posta listelerimin varsayılan koşulu mu olacak?

1 vba microsoft-outlook-2013

1

Excel CubeValue yenilemesi için bağlanmanız gereken bir etkinliğe mi ihtiyacınız var?

Cubevalue yenilemesi veya güncellemesi için bağlayabileceğim bir VBA etkinliği var mı? Değer döndürüldüğünde özel bir grafik eksenini yeniden yapılandırmaya çalışıyorum. Hesaplamayı denedim ama işe yaramadı.

1 microsoft-excel microsoft-excel-2010 vba events

1

Excel'de geçerli hücrenin yanında bir hücre seçme

Excel'de boş hücrelerin değerini "NO DATA" olarak değiştiren küçük bir vba yapıyorum. Şimdiye kadar yaptığım şey bu: Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo hell: Application.Goto reference:="DBtable" Selection.SpecialCells(xlCellTypeBlanks).Select Selection.SpecialCells(xlCellTypeBlanks).Value = "NO DATA" 'I DON'T KNOW WHAT TO PUT HERE hell: End Sub Ne olacağını söylemek isterim ki, ne …

1 microsoft-excel-2010 vba

1

Excel: VBA betiği klasörü yarat - seçilen hücreden değer elde edilsin mi?

Bir dizinde yeni bir klasör oluşturmak için bir VBA kodu kullanıyorum. Yapmak istediğim, seçilen hücreden yeni klasör adını almak. Lütfen bunu nasıl yapabilirim? İşte şimdiye kadar sahip olduğum kod. If Target.Column = Range("B1").Column Then If Target.Row > 7 Then 'Variable definitions Dim FolderListRange As Range Dim FolderRange As Variant Dim …

1 microsoft-excel vba

1

Excel 2007'deki bir sütunda birden çok sözcük bulun ve değiştirin

Sub xLator2() Dim s1 As Worksheet, s2 As Worksheet Dim N As Long, i As Long Dim from(), too() Set s1 = Sheets("Sheet1") ' contains the data Set s2 = Sheets("Sheet2") ' contains the translation table s2.Activate N = Cells(Rows.Count, 1).End(xlUp).Row ReDim from(1 To N) ReDim too(1 To N) For …

1 microsoft-excel-2007 vba macros

2

“Çağrılan nesnenin müşterilerinden bağlantısı kesildi.”

Giriş isteyen ve yeni bir sekme oluşturan bir düğmem var. İlk çalıştırma harika çalışıyor, ancak sonraki çalıştırmalar bu hatayı veriyor: İşte kod: Sub btnAddProject() Dim template As Worksheet Dim newSheet As Worksheet Dim newName As String newName = Application.InputBox("Enter Project Name") 'get name Worksheets("Template").Visible = True 'Unhide template Set template …

1 microsoft-excel vba

3

Excel VBA: Ayırıcı Sayısı

Takip koduna sahibim: Sub CopyTest() Dim skuRow As Integer Dim curSku As String Dim numSkus As Integer Dim impType As String Dim copyRows As Integer Dim supAcc As String Dim arr_TotalList As Variant Dim locs As String Dim colorMax As String With ActiveSheet copyRows = 3 impType = "-LE" supAcc …

1 microsoft-excel vba

«vba» etiketlenmiş sorular