Résultats de la recherche

Bonjour Visiteur.... va jeter un coup d'oeil à ce lien car ta forme un peu direct risque de choquer... Sinon, pour ton pb, un peu de détail c'est mieux: type de fichier qui contient tes data, type de traitement....... A+ DSA

Bonjour hady, j'ai déjà eut ce type de besoin et j'ai utilisé le code ci-dessous: Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) If Cells(2, 2) <> Cells(3, 2) Then Cells(2, 2) = Cells(3, 2) 'Ton appel macro ici End If End Sub en décoder, en cells(3,2)...

Rebonjour, malgré tout, j'ai bidoullé un truc qui peut peut être faire l'affaire. C'est basé sur l'évaluation du texte de formule avec un remplacement d'1 texte particulier par une valeur (je l'ai déjà vue qqpart, mais je ne le retrouve pas). Juste une question ouverte à tous: Comment faire...

Bonjour LeBelge, le forum, désolé mais je ne comprend plus rien..... Je pense qu'il faudrait que tu refasse ton fichier de manière à clarifier ton pb ou au moins que tu décrive les formules de manière litéral (ex Volume = ...*Essence... * HDom)... A+ DSA

Paladin, tout d'abord suit les conseils de 2passage, c'est tjs très formateur et comme personne n'a la science infuse, c'est l'enregsitreur de macro qui te permet de te rapeller comment t'avais fait il y a 6 mois pour.... Sinon, tu trouvera en pièce jointe une petite contribution, Cela...

Bonjour, même avec ton fichier, c'est un peu léger. Cela serai plus simple si tu pouvais ajouter une partie du fichier ou sont stockées les actions, met des actions bateaux si c'est confidentiel type: Fiche1 action1, Fiche2 action1 et action2.... met en gardant la structure de ton fichier...

Bonjour, pour info, VBA est séquentiel, tu ne peux utiliser un if en une ligne que si tu ne veux executer qu'une action. dans ton cas, utilise plutot: if textbox36 =' 1' then texbox37 = ' ok' letexte= ' faire ceci ' end if Cela devra régler ton pb de if. Concernant le nbre de...

ReBonjour, Merci Robert pour le nommage de contrôle à la volée... Sinon, Jeralex, dans le if de ton bouton utilise cette condition Worksheets('Essai').Shapes('CheckBox1').ControlFormat.Value=1 cela devrai passer. Cependant, ce n'est pas la méthode la plus simple. Je te conseille...

Rebonjour, concernant la méthode de Robert, pour nommer ta checkbox, tu peux tapper le nom que tu veux ds la zone de nom de la barre de formule d'XL (la case ou normalement tu as les coordonnées de cellule). A+ DSA

Bonjour Jeralex, le forum, je ne suis pas sur que l'on puisse utiliser cette procédure de nommage pour récupérer la valeur de la checkbox. Je pense qu'il est plus simple de passer par l'onglet propriété de la checkbox (en mode création, clic droit) et de renseigner le champ Name. Ensuite pour...

Bonjour à tous, a priori, en fonction des essences d'arbre tu applique un coef, je pense que le plus simple c'est de faire une rechercheV sur ton tableau d'essence pour sortir le coef puis tu appliques ta formule. Sur le fichier joint, j'est utilisé la formule: Coef * Hdom *...

Bonjour, à mon humble avis, tu devras passer par une sub/function sur l'événement onexit de ta textbox. Comme son nom l'indique, une textbox = boîte à texte et non pas à calcul. Pour évaluer des expression simple (+, -, /, *) utilise un instr pour l'identification de l'opération puis un...

Rebonjour, ci-joint une solution possible utilisant un timer. J'avoue de pas avoir inventé grand chose car je me suis basé sur un exemple que tu trouvera sur le site A+ DSA [file name=XLD_SubaTpsDonnet.zip...

Bonjour, à mon humble avis, le plus simple c'est de récupérer les valeurs initiales de chacuns de tes paramètres dans un tableau déclaré ds ta partie déclaration du userform puis d'utiliser soit l'événement OnChange ou le OnExit des champs de saisie pour comparer nvell valeur et celle...

bonjour, peut être que la réponse est déjà sur un des 4 autres fils mais tu peux utiliser dans 'la cellule d'à coté': * =cellule cible * un format personnalisé ou tu saisie mmmm. Normallement cela doit marcher.... A+ DSA

Bonjour, petit pb, ton fichier n'est pas passé. Ce doit être un .zip, sans accent et sans espace, sans caractères spéciaux et de taille <50ko A+ DSA

Bonjour, tu peux essayer: =SI(RECHERCHE(C1;A1:B3)=C1;'Pas possible';'Nouvelle valeur') avec dans la formule C1= cellule que tu veux comparer et A1:B3: plage des données. A changer suivant ta feuille. J'espère que cela va t'être util A+ DSA

Bonjour, tu trouveras ds le fichier une solution possible (j'ai du modifier un peu l'appel du USF car cela ne marchait pas sur mon Excel)... Pour info, il y a 2 ou 3 jours un fil traitait le même pb (désolé, j'ai oublié le titre) A+ DSA [file name=Deudecos2.zip...

Bonjour à tous, Daniel, si tu as vraiment besoin d'éliminer ces controles, tu peux utiliser la modif du code de Thierry suivante: Private Sub CommandButton3_Click() Dim CTRL As Control Dim i As Integer i = 0 For Each CTRL In Me.Controls If TypeOf CTRL Is MSForms.TextBox Then...

Bonjour, pour le transmettre le plus simple c'est de transmettre le fichier (ok c'est une lapalissade....). Sinon, classqiuement une fonction de transposition transpose. En gros, si tu as des données en 3 colonnes et 5 lignes, la transposition te donnera 5 colonnes de 3lignes.... alors que...