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, a tous,
je vous sollicite car j'ai beau mettre en œuvre mes modestes connaissances en vba.
le résultat est toujours le même 😭😤
je joins un petit fichier ou les informations sont placés exactement comme sur l'original.
un grand merci a vous.
Bonsoir Payne,
sélectionne tes cellules, puis mise en forme conditionnelle, puis règle de mise en surbrillance, puis supérieur à et dans la case qui clignote tu écris =aujourdhui() et tu choisit la mise en forme que tu veux puis mise en forme conditionnelle, puis règle de mise en surbrillance...
bonsoir JHA,
après modification dans la cellule de la ligne active en colonne 14,22,30,36,42,48,54,62,68,74,80,86 on doit vérifier si la valeur 2 est présent dans la colonne 135 de la ligne active.
voilà qui sera peut être plus clair
merci
bonsoir,
effectivement en réactualisant l'affichage ca marche
Sub MEF_Brass()
Application.ScreenUpdating = False
With Worksheets("CABLAGE")
.Cells.FormatConditions.Delete
With .Range("A1:A1700").FormatConditions
.Add(xlTextString, , , , "RJ"...
re test ce code car je l'ai modifier pour qu'il tienne compte de "Ajout inventaire ou vente"
Private Sub Worksheet_change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("T_inventaire")) Is Nothing Then
Application.EnableEvents = True...
salut samfau.
j'ai essayer avec mes compétences de t'aider mais sans succès.
même en modifiant la macro sur le feuil pour rechercher jusqu'à la colonne 25 cela ne fonctionne pas
une idée sur un autre changement que tu aurais fait ?
Bonsoir,
je vous sollicite de nouveau, je souhaiterais ..
qu'a la saisie d'une valeur en colonne 14,17,21,27 à partir de la (ligne 4 jusqu'à la dernière cellule remplie de la colonne D)
qu'une vérification se fasse sur la colonne EI de la ligne active pour vérifier que la valeur ne
soit pas...
bonsoir a vous tous,
je ferme se fil car finalement je vais laisser le code comme il est avec timer la macro met 4 sec c'est acceptable
merci merci pour votre aides et le temps que vous mettez à notre disposition .
merci pour votre compassion mais non rien de grave blocage du dos. je m'occupe d'alléger le fichier et je vous le mettrez en pièce jointe.
merci a vous tous pour votre aide.
bonjour, merci pour votre retour. je me suis blessé au boulot ce matin donc je vais avoir du temps pour vous préparer un mini fichier.
encore merci a vous de votre aide.
Bonjour a tous.
et merci
je souhaite mettre en œuvre se code mais sans réussite.
Dim c As Range
Dim firstAddress As String
Dim NumCombo As Variant
Dim NumTextBox As Variant
Dim c As Range
Dim firstAddress As String
With Worksheets("Tarifs").Range("C4:C3004")
For NumTextBox =...
Bonsoir a tous.
je galère pas mal sans trouver de solution..
auriez vous une idée ? et merci d'avance
Private Sub CommandButton11_Click()
Dim O As Worksheet 'déclare la variable O (Onglet)
Dim R As Range 'déclare la variable R (Recherche)
Dim LI As Long 'déclare la variable LI (LIgne)
Set O =...
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.