Résultats de la recherche

bonjour à tous en principe : "=SOMME.SI(A2:A17;A1;D2:D" & lastrow & ")"

Bonjour à tous le total de la semaine 28H *4=112h + 1 mardi 7H =119 soit =i15*4+c15

bonjour à tous,Phil For Each Item In ListObjects("Tableau1").ListRows Worksheets("Feuil2").Range("A" & i).Value = Range("Tableau2[Lignes]") cela me semble incohérent as tu essayé de remplacé Range("Tableau2[Lignes]") par Item et comme dit Phil sans fichier pas facile de répondre correctement

Bonjour a priori en vba cells(Range("Ligne"),Range("Colonne")).select

Bonjour à tous fait avec excel 2016 bonne journée

bonjour a mettre dans un module et a relier avec la forme si j'ai bien compris le problème Sub oui_non() Select Case StrConv(Range("G101").Text, vbUpperCase) Case "", "NON": Range("G101") = "OUI" Case "OUI": Range("G101") = "NON" End Select End Sub

en voici un pris au hazard dans téléchargement du site https://excel-downloads.com/resources/gestion-caisse-et-stock.1051/

Bonjour à tous la 1ere ligne tu la laisse comme elle est et à la 2eme tu mets =T_avanceOuvrier[@Ouvrier]&"-"&NB.SI($H$5:H6;T_avanceOuvrier[@Ouvrier]) et recopie incrémenté vers le bas

Bonjour à tous, vgendron en passant par un tableau intermédiaire j'ai juste fait 3 colonnes

Bonjour à tous regarde si cela te convient les procédures sont sur un module et plus sur thisworkbook j'ai viré la combobox qui pour moi ne sert à rien je n'ai pas pu vraiment testé la macro car il n'y a que des Ko Compte mais j'ai confiance bonne journée

Bonjour à tous Si j'ai bien compris la feuille saisie est bien plus grande et comporte surement des doublons Mondico te sers à filtrer les données pour avoir 1 seul titre la feuille compte sert de tableau modèle on boucle sur la liste feuille saisie, on additionne les 2 sommes (crédit et débit)...

bonjour à tous si la combobox est de type formulaire une cellule est liée et il suffit de le traiter si c'est une activeX tu peux faire quelque chose comme cela N0 item Private Sub ComboBox1_Click() Select Case ComboBox1.ListIndex Case 0 Debug.Print "choix 1...

Bonjour à tous essaye ceci Sub EntetePiedPersonnalise() Dim myText As String titre = InputBox("Entrez le titre ici", "Titre du document") With ActiveSheet.PageSetup .LeftHeader = "Nom du pays" & Chr(10) & "nom de la region" & Chr(10) & "nom de la province" & Chr(10)...

Bonjour à tous mes meilleurs vœux a ma connaissance, tu ne peux pas. C'est a toi de colorier les mots clés dans ton mode

Bonjour excuse moi Hasco je n'avais pas fait attention que tu avais déjà répondu en poste 3 Bonne fête

Bonjour à tous Ceci peut être Private Sub Worksheet_Change(ByVal Target As Range) Dim cl As Range If Not Target Is Nothing Then Application.EnableEvents = False Application.Calculation = xlCalculationManual Application.ScreenUpdating = False...

bonjour à tous,staple1600 je pense que cela vient du counta teste ceci Private Sub CommandButton10_Click() Dim lr As Integer If Me.txt_product.Value = "" Then Err.Raise vbObjectError + 1 If IsNumeric(Me.txt_price_pru) = False Then Err.Raise vbObjectError + 2 If...

Bonjour à tous je suis parti du principe que ton tableau débutait toujours en a2 Sub copiercoller() Dim Lg%, Col%, Ws As Worksheet, Sh As Worksheet Set Ws = Workbooks("Classeur1.xlsm").Sheets("Vantaux sur mesure") Set Sh = Workbooks("Classeur2.xlsm").Sheets(1) Lg = Ws.Range("A"...

Bonjour tbft pour moi c'est la meilleur solution Bonne journée

re dans ce cas pas besoin de macro dans la feuille param j'ai fait une table puis créer un nom qui définie la table elle peut grandir ou raccourcir tous les chiffres seront prix en compte et enfin relier la liste de validation avec le nom a+