taille de police dans une box de texte (moteur de recherche excel vba)

taille de police dans une box de texte (moteur de recherche excel vba) - VB/VBA/VBS - Programmation

Marsh Posté le 09-12-2014 à 23:07:26    

Bonjour, Je suis tout juste débutant dans le visualbasic, j'ai entrepris de créer un moteur de recherche afin de répertorier les numéros d'ambulances à mon travail.
 
Bref j'ai récupéré un fichier précréé et je l'ai modifié pour mes besoins. Je souhaite juste à présent modifier la taille de la police dans la box de résultat.
 
Voici le code que j'ai récupéré:
 
---------------------------------------
 
Option Compare Text
 
Private Sub TextBox1_Change()
     
    Application.ScreenUpdating = False
     
    Range("A2:A100" ).Interior.ColorIndex = 2
    ListBox1.Clear
     
    If TextBox1 <> "" Then
        For ligne = 2 To 100
            If Cells(ligne, 1) Like "*" & TextBox1 & "*" Then
                Cells(ligne, 1).Interior.ColorIndex = 43
                ListBox1.AddItem Cells(ligne, 2)
            End If
        Next
    End If
     
End Sub
 
______________________________
 
http://img11.hostingpics.net/pics/948807Capture.jpg
 
Voici le rendu, je souhaiterais que les numéro de téléphone apparaissent plus gros mais je ne sais pas du tout comment coder ça.
Merci d'avance et désolé pour cette question qui paraîtra des plus basiques :)

Reply

Marsh Posté le 09-12-2014 à 23:07:26   

Reply

Marsh Posté le 10-12-2014 à 00:01:35    

Me![BoxRech].FontSize = 24
 
Avec boxrech le nom de ta box de résultat
Par contre j'ai testé sous access pas sous excel

Reply

Marsh Posté le 10-12-2014 à 09:34:20    

d'accord je vais essayer. Je te remercie beaucoup

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed