Résultats de la recherche

Bonjour je voudrais savoir comment selectionner le mercredi de la 3 semaine du mois merci

bonjour je souhaiterai faire =SI(ET(H2="jeu";H5="A");6;"") en vba mais du 1 janvier au 31 decembre sauf quand vba il m'ecris ca ActiveCell.FormulaR1C1 = "=IF(AND(R[-16]C=""jeu"",R[-13]C=""A""),6,"""")" Range("C18").Select Selection.AutoFill Destination:=Range("C18:NC18")...

Bonjour, j'ai une formule en C15, C28, C41, C53, C66 et C79 à AN79 (sur le fichier j'ai mis qu'un bout) qui marche nickel mais je voudrais savoir comment écrire une routine qui fait la même chose en vba car j'ai des gentils collègues qui tripote a tout merci

Bonjour je voudrais une petite aide sur ma formule je voudrais integrer ça =si([Planning_EP.xlsm]ep2019!$C$6=6 alors Sub ep2019_33100() 'equipe A Dim plage1 As Range, plage2 As Range, jour, c As Range, j As Variant Set plage1 = [[Planning_ep.xlsm]ep2019!F7:BE7] Set plage2 =...

Bonjour j'ai fait un planning perpetuel mais je voudrais que les info dans la partie jaune sur l'annee exemple 2018 n'apparaisse pas en 2019 etc...mais je ne sais pas comment merci

Bonjour j'ai un soucis je ne sais pas comment ecrire en vba sur la ligne 1 j'ai mon roulement colonne A j'ai mes 6 equipes en colonne I il ne peuvent pas faire de M ou A je voudrais une msgbox"interdit" si M ou A apparait sur la colonne i2:I7 merci

Bonjour, je souhaiterai mettre ces 2 formule en une seule Range("A3") = Now Range("A3") = Environ("username") comment faire merci

bonjour, j'ai un soucis je l'alerte se fasse que pour les case 6 et 7 mais pas les autres sauf que ca me met une alerte sur les case 9 10 11 Option Explicit Private Sub Worksheet_Change(ByVal Target As Range) If Target.Count > 1 Then Exit Sub If Not Application.Intersect(Target...

Bonjour, j'ai un souccis car excel me dit que j'ai trop d'argument comment faire =SI(C14="M";C21+NB.SI(C6:C11;"RM"+NB.SI(C24:C56;"RM"));SI(C14="A";C21+NB.SI(C6:C11;"RA"+NB.SI(C24:C56;"RA");SI(C14="N";C21+NB.SI(C6:C11;"RN"+NB.SI(C24:C56;"RN");""))))) merci

Bonjour, j'ai un soucis sur une formule je n'arrive pas a ecrire SI F5="M" alors F12+NB.SI(F15:F56;"RM") si F5="A" alors F12+NB.SI(F15:F56;"RA") SI F5="N" alors F12+NB.SI(F15:F56;"RN") j'ai ecris ca mais ca marche pas...

Bonjour je voudrais que lorsque je met "21" dans la ligne c6 à NC6 il me lance ma userform(alerte.show) merci

Bonjour, je voudrais savoir comment faire pour encadrer en rouge les cellules c6 à c11 si c14="ok" merci

Bonjour, j'ai un soucis sur une formule =SI(ET(C17:C22="RN";C12=4);"1N";"ok") il me renvoie une erreur merci

Bonjour, j'ai un problème d'impression sur mon bouton il me prend que les 4 premières colonnes au lieu de 5 merci

Bonjour, dans ma macro je voudrais qu'a la fin il me selectionne la date de jour que se trouve dans la ligne c merci Sub Workbook_Open() Application.EnableEvents = False 'désactive les évènements Workbooks.Open Filename:= _...

j'ai créé un code mais je ne sais pas comment mettre la case rouge ecriture blanche merci Sub ep2019_33100() 'equipe A Dim plage1 As Range, plage2 As Range, jour, c As Range, j As Variant Set plage1 = [[Planning_ep.xlsm]ep2019!F7:BE7] Set plage2 = [[Planning_ep.xlsm]ep2019!F2:BE2] 'ligne 2 et...

Bonjour, j'ai un problème d'ouverture de fichier malgré que le chemin soit bon j'ai le message suivant chemin introuvable Sub Workbook_Open() Application.EnableEvents = False 'désactive les évènements Workbooks.Open ThisWorkbook.Path &...

Bonjour, je ne sais pas comment faire simple sans passer par une macro pour mettre un lien hypertext dans le menu deroulant sur la feuille liste! j'ai les FS1,2,3 etc.. de B2:b12 avec des lien hypertext dans la feuille planning en type j'ai la liste deroulante qui se fait bien mais sans les lien...

Bonjour, j'ai une erreur ligne 9 et je ne comprend pas pourquoi merci

bonjour, ma macro plante juste après l’aperçu et fait planter excel (voir image ci joint) Private Sub CommandButton1_Click() Dim i As Byte Dim plage As Range Annuler = False 'passer à faux avant l'impression... For i = 1 To 12 If Controls("checkbox" & i) = True Then...