Contenu récent par harry226h

Deb, Dranreb n'a pas dis de ne pas utiliser de macro, il disait juste qu'il n'y avais pas de macro dans ton exemple. appel ta fonction comme ceci Sub macro_somme() Call 'fonction End Sub

Possible de joindre un fichier exemple?

Qu'est ce qui est souligné?

Bonjour Deb, le forum Non testé mais essai ca Function minimiser_dm() Dim i As Integer Dim m As Integer 'attribue une valeur à m Dim duree As Variant Dim dm As Long dm = 0 For i = 1 To m dm = dm + (m - i + 1) * Cells(i, 4) Next i duree(1, 2) = dm End Function cdt A

Bonjour Maxwellou, le forum A tester Sub save() Dim Wb As Workbook For Each Wb In Workbooks Wb.Save Next Wbk End Sub cdt A

Salut Mic, le forum Ci joint ton fichier modifié, en esperant que c'est ce que tu veux. Cdt A

Bonjour Med, le forum Si c'est une variable je ne la voit pas déclarée en fait. Mais bon ravi que tu es pu trouvé une solution. cdt A

Bonsoir @Staple1600 , on y arrivera et lui aussi. Il a vraiment envie d'apprendre et il avance bien. @FOUQUET Yves , c'est grace au balise que tu arrives a lire nos message comme ci dessous : et hop Quand tu ecris sur le forum, il suffit de cliquer sur </> avant d'ecrire le code. Cdt A

Bonjour Med Déjà le N° sera interprété comme une variable si tu le laisse ainsi. Tu devrais plutôt essayer : Sheets("Saisie BT").Range("a5") = "N°"

Bonjour Yves, le forum Tu as essayé comme ca : Sheets(feuille).Select NB : pense a baliser ton code, ca sera plus facile à lire. cdt A

Je regarde ca demain stp! La j'ai sommeil

A tu une ligne surlignée?

Le probleme il es ailleurs dans ton code alors. J'ai pas d'erreur a mon niveau

Comme ceci : Unload Facture_Fournisseur Ajouter_article.Show Et Unload Facture_Fournisseur Ajouter_Fournisseur.Show Cdt A