Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Bonjour @JHA
Merci pour ta réponse ;)
Il n'y a que B10 qui change de couleur ...
Je souhaiterai que toute la colonne passe au rouge soit B8:E34
Mais c'est déjà pas mal 👍
Bonsoir @sylvanu @TooFatBoy ;)
Merci pour vos réponses
C'est bien un problème d'espace :rolleyes:
Merci a vous deux 👍
Bonne nuit a vous deux et encore merci ;)
Bonsoir le forum ;)
Voici mon problème ...
Ci-joint trois fichiers " FICHE TOUSSAINT 1 " , " TOUSSAINT ASTUCE SIRENE " , " MISE A JOUR PIC NIC "
Le premier fichier " FICHE TOUSSAINT 1 " est alimenté via vba par " TOUSSAINT ASTUCE SIRENE " qui lui même est alimenté via vba par " MISE A JOUR...
Bonjour @Jacky67
J'ai bien compris pour la MFC "=JOURSEM($D4;2)>5" s'applique à "=$A$4:$J$34"
Mais je pèche avec celle des jours fériés :rolleyes:
Serait-il possible d'avoir une explication ?
Merci et bonne journée ;)
Bonsoir @Jacky67
Le top 👍
Bien vu pour la colonne "D"
Ok pour les autres mois ;)
Merci pour ton aide et merci pour la participation de @riton00
Bonne soirée ...
Bonjour le Forum ;)
Dans le fichier ci-joint , dans la feuille "Janvier" j'ai une MFC qui colore les samedis et dimanches "A4:D34"
mais lorsque j'étend la sélection "A4:J34" cela ne fonctionne pas du tout comme je le souhaiterai ( voir l'exemple du problème dans la feuille "Fevrier"
Je...
Bonsoir le forum ;)
Voici mon problème …
Dans l’onglet « Journal « du fichier « GESTION STOCKS » je souhaiterai lors de l’appuie sur le bouton « Mise a jour prix de revient «
Que celui-ci incrémente les cellules suivantes …
"Prestation"," Format", "Type"," Pax" puis les valeurs "SORTIES "...
Ok ;) !
C'est bien ce que j'avais compris mais pourtant cela ne fonctionne pas :rolleyes:
Private Sub CommandButton2_Click()
Application.ScreenUpdating = False
NomFichier = "GESTION - POTS.xlsm"
FichierCourant = ThisWorkbook.Name
Workbooks.Open ThisWorkbook.Path & "\" &...
Re,
DL = Sheets(F.Name).Range("E65500").End(xlUp).Row - 1
.Range("C4:C" & DL).Copy
Sheets(F.Name).Range("C4:C" & DL).PasteSpecial xlPasteValues
Cela donne ça alors ?
Bonjour @sylvanu ;)
Je reviens vers toi ...
Apres modification du fichier les données ont changé :rolleyes:
"GESTION-POTS " vers "PRIX DE REVIENT"
Toute la colonne de :
"C4" vers "C4"
"E4" vers "E4"
"F4" vers "F4"
"G4" vers "G4"
"H4" vers "H4"
J'ai réduit le fichier a 6 mois car trop...
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.