Sqlserver
 sql >> Teknologi Basis Data >  >> RDS >> Sqlserver

Masalah kinerja dalam daftar Pencarian Dropdown Dinamis di excel

Saya tidak tahu tentang kinerja, tetapi cobalah yang berikut ini. Data Anda seharusnya dalam lembar "db", dari baris 2 dan seterusnya. Alih-alih kotak kombo, saya menempatkan kotak teks (TextBox1 ) dan daftar (ListBox1 ) dalam Formulir Pengguna.

Private Sub TextBox1_Change()
    Dim v As String
    Dim YourInput As String
    Dim iIdx As Long
    Dim CharNumber As Integer

    YourInput = TextBox1.Text

    Application.ScreenUpdating = False
    Application.Calculation = xlCalculationManual
    Application.EnableEvents = False

    ListBox1.Clear

    lLastRow = Worksheets("db").Cells(3, 1).End(xlDown).Row
    CharNumber = Len(YourInput)

    For iIdx = 2 To lLastRow
        v = Worksheets("db").Cells(iIdx, 1).Text
        If LCase(Left(v, CharNumber)) = LCase(YourInput) Then
            ListBox1.AddItem v
        End If
    Next

    Application.ScreenUpdating = True
    Application.Calculation = xlCalculationAutomatic
    Application.EnableEvents = True
End Sub

Private Sub ListBox1_Click()
    MsgBox ("Your selection: " & ListBox1.Text)
    'do your stuff
End Sub


  1. Database
  2.   
  3. Mysql
  4.   
  5. Oracle
  6.   
  7. Sqlserver
  8.   
  9. PostgreSQL
  10.   
  11. Access
  12.   
  13. SQLite
  14.   
  15. MariaDB
  1. SQL Server:bagaimana cara menghitung median (dikelompokkan oleh)?

  2. Bagaimana cara memperbarui data dari tabel ke tabel sql?

  3. SQL:Di mana MYID =APAPUN?

  4. Jadikan server otomatis menjalankan asp-script setiap hari

  5. Pilih contoh pertama dari sebuah catatan