Pertanyaan yang diberi tag «vba»

Visual Basic untuk Aplikasi; bagian dari Visual Basic yang digunakan di semua aplikasi Microsoft Office. Pertimbangkan untuk menggunakan tag ini bersama dengan tag untuk aplikasi spesifik yang dimaksud. Pertanyaan bagus tentang VBA umumnya berisi beberapa kode dan meminta solusi untuk masalah tertentu. Pertanyaan yang menanyakan seluruh solusi (tolong beri saya kode / bagaimana melakukan ini dan ini dengan VBA) adalah diluar topik dan akan ditutup terlalu luas.

0
Cara mengetahui kapan suatu file ditutup
Saya memiliki skrip yang menyalin bagian data dari satu file ke file lainnya. File tujuan dibagikan di antara pengguna. Setelah salinan, saya menyimpan dan menutup file tujuan dan mengeluarkan pesan "Diperbarui". Kode Saya: ... Workbooks(CurrFile).Activate Worksheets(CurrHosp).Range("A1").Select Selection.PasteSpecial xlPasteValues TimeStamp = Now() ActiveSheet.Range("A5").Value = TimeStamp ActiveSheet.Range("A1").Select Workbooks(ModelFile).Close SaveChanges:=False Workbooks(CurrFile).Close SaveChanges:=True MsgBox …
2
Merakit Word Doc menggunakan Data dari Excel-MS Office 2010
Saya memiliki kuesioner yang diisi pengguna. Itu di Excel. Setelah pengguna menyelesaikan kuesioner, saya ingin dapat menghasilkan dokumen Word yang berisi jawaban mereka. Misalnya "Jawaban untuk pertanyaan Anda adalah [jawaban dari sel Kuisioner Excel A49]" Saya telah melihat bahwa ini mungkin dengan Sharepoint. Namun, saya tidak memiliki Sharepoint. Saya sedang …
1
Excel 2010 VBA ke Hyperlink Active Cell, jadi itu akan mengarah ke lokasi persisnya dari saat sel itu ditempel dan dikirim dalam Outlook e-mail
Tujuan: Excel 2010 - VBA untuk Hyperlink Active Cell untuk dirinya sendiri, sehingga akan mengarah ke lokasi yang tepat di spreadsheet mulai dari saat sel itu disisipkan dan dikirim dalam email Outlook. Saya perlu menjaga isi sel Excel tetap utuh - tetap menampilkan apa pun yang saya miliki di dalamnya …
2
Sel otomatis setelah fungsi kembali
Saya memiliki xla dengan banyak fungsi. Pada dasarnya masing-masing fungsi ini melakukan pencarian vertikal pada lembar kerja lain. Berikut adalah contoh dasar dari salah satunya: Function ax2Project_Address(projectnumber) If (projectnumber = "?") Then ax2Project_Address = "Unknown address" Else ax2Project_Address = Application.VLookup(projectnumber, Sheets("AX Data").Range("A:K"), 11, False) End Function Ini memungkinkan pengguna untuk …
1
Excel 2010 - Tampilkan konten sel - tampilan nomor salah
Saya mencoba membuat fungsi sederhana di editor Excel VBA. Ketika saya mengklik sel dalam rentang tertentu, saya ingin menyalin nilainya ke sel lain yang telah saya atur. Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Selection.Count = 1 Then If Not Intersect(Target, Range("B3:N15")) Is Nothing Then ActiveSheet.Range("B17").Value = Target.Value End If …
1
Word VBA mem-parsing teks dan mengubahnya menjadi sebuah tabel
Memasukkan: ##TABLE_START## ##ROWS=3 ##COLS=2 ##Value ##Decode ##0 ##Clock running ##1 ##Clock not running ##TABLE_END## ##TABLE_START## ##ROWS=4 ##COLS=2 ##Value ##Decode ##0 ##Off ##1 ##On ##Z ##High Z ##TABLE_END## Output yang diinginkan: Saya ingin melakukan ini untuk sekitar 400 tabel. Saya mencoba merekam makro dalam kata, tetapi mengunci mouse saat merekam makro, …
2
PC tidak dapat menemukan EXP_PDF.DLL
Saya memiliki buku kerja Excel yang menggunakan VBA untuk membuat PDF dari lembaran, dan mengirimkannya melalui email melalui Outlook. Ketika saya mengklik tombol untuk membuat PDF dan mengirim, Microsoft Visual Basic memberi saya pesan kesalahan berikut: Kesalahan kompilasi: Tidak dapat menemukan proyek atau perpustakaan Debugger kemudian menyoroti kode berikut: Function …
2
Sorot jika disertakan dalam string ATAU TextToColumn di VBA
Saya punya 1 atau 2 pertanyaan, tergantung solusi. Saya memiliki data seperti 001.1, 003.1, 005.1 ... dalam sel. Lalu saya punya sel dengan data seperti "001.1 | 005.1". Apa yang ingin saya lakukan, jika memungkinkan - saya ingin membandingkan nilai-nilai tunggal ini dengan nilai-nilai yang tidak terpisahkan dan jika beberapa …
1
Hapus baris duplikat kecuali baris dengan nilai nol dan nol
Sub Workbook_Open() Dim value As Integer value = Range("B3:N1955").value If IsEmpty(value) Or value > 0 Then Range("B3:N1955").RemoveDuplicates Columns:=13, Header:=xlsm Else End If End Sub Saya ingin menghapus nilai baris duplikat kecuali baris dengan nilai 0 atau nol. Saya terus mendapatkan kesalahan 'Ketik Ketidakcocokan' setiap kali saya menjalankan kode di atas. …
1
Excel: Temukan hyperlink yang cocok
Setelah menghabiskan waktu mencari di internet untuk jawaban tanpa hasil, inilah pertanyaan saya: Saya memiliki dua buku kerja, sebut saja 'profil' dan 'hasil'. Dalam 'profil', saya memiliki selembar yang memiliki hyperlink dalam A3 hingga A2000. Nama muncul di sel-sel ini, seperti 'Jim', 'Dave', 'Anne' dll. Hyperlink yang mendasari hanya berbeda …
Dengan menggunakan situs kami, Anda mengakui telah membaca dan memahami Kebijakan Cookie dan Kebijakan Privasi kami.
Licensed under cc by-sa 3.0 with attribution required.