Impossiple d'utiliser un textbox dans une feuille selon le pc

Bonjour a tous,

j'ai un gros problème que je ne comprends pas ......

J'ai un fichier ( ci-joint) dans lequel j'ai un textbox qui sert à faire une recherche.

Sur le PC de mon domicile je peux saisir sans aucun problème dans ce textbox.

Par contre sur les PC de mon travail impossible de saisir quoi que se soit dans ce textbox.

Pour info, c'est la même chose avec plusieurs fichiers contenant des textbox .

Y a t il un paramétrage spécifique a faire dans VBA ou sur EXCEL, je précise que tous les PC sont en 365.

la je sèche ...

Un peut d'aide ne serait pas de trop...

Cdt

Désolé

c'est mieux avec la PJ..

Bonjour,

Un essai ...

Private Sub CommandButton1_Click() ' lise à jour des tarifs par rapport à la basse de donnée
    Dim dlg&: dlg = Cells(Rows.Count, 1).End(3).Row
    Dim cel As Range, pdt$, lig&

    With Worksheets("Recherche")
        If dlg = 1 And IsEmpty(.Cells("A")) Then Exit Sub
        Application.ScreenUpdating = 0: .Range("B1:B" & dlg) = Empty
    End With

    With Worksheets("BASE")
        For lig = 1 To dlg
            pdt = .Cells(lig, 1)
            If pdt <> "" Then
                Set cel = .Columns(1).Find(pdt, , -4163, 1, 1)
                If cel Is Nothing Then
                    .Cells(lig, 2) = "?"
                Else
                    .Cells(lig, 2) = Round(cel.Offset(, 2), 2)
                End If
            End If
        Next lig
    End With
    ActiveCell.Select 'pour désélectionner le bouton
End Sub

ric

Bonjour ric, JulienP91

Pour le souci au travail, c'est qu'une sécurité (GPO) sur les Contrôles ActiveX doit exister.

Le meilleur moyen serait de remplacer tout ça par un UserForm

A+