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,
mets le exit sub dans ton if :
If IsNumeric(Range("M" & y).Value) And Len(Range("M" & y).Value) = 6 And (Range("I:L" & y).Value) = "" Then
MsgBox "vous avez oublié une saisie", vbCritical
Exit Sub
End If
(n'oublie pas de supprimer "_" au bout de la ligne if)
Bonjour,
utilise une fonction matricielle (à valider avec shift + entrée) :
{=SOMME(ARRONDI(C6:C8*D6:D8;2))}
Explications :
Les arguments de la fonction SOMMEPROD sont des matrices.
Hors, la fonction ARRONDI retourne un scalaire (un nombre), mais pas des matrices.
Donc la formule...
Quelques confusions entre Feuil1/Feuil2 et r/s
Le bon code :
Sub Compare2()
Dim r As Range
Dim s As Range
For Each r In Feuil2.Range("a2:a" & Feuil2.Range("a1").CurrentRegion.Rows.Count)
For Each s In Feuil1.Range("a2:a" & Feuil1.Range("a1").CurrentRegion.Rows.Count)
If r.Value...
Bonjour,
Essaye
Sub Compare2()
Dim r As Range
Dim s As Range
For Each r In Feuil2.Range("a2:a" & Feuil2.Range("a1").CurrentRegion.Rows.Count)
For Each s In Feuil1.Range("a2:a" & Feuil1.Range("a1").CurrentRegion.Rows.Count)
If r.Value = s.Value Then...
Désolé, je n'avais pas compris.
Dans ce cas:
=EQUIV(MIN(RECHERCHE(C2;$H$2:$H$5);C2);$H$2:$H$5;0)
devrait faire l'affaire.
Attention, ma formule matricielle ne fonctionne pas pour "filtrer selon B".
Et là je n'ai pas le temps d'investiguer...
Excel propose les fonctions Quartile.Inclure(matrice;quart) et Quartile.Exclure(matrice;quart).Ex: =QUARTILE.INCLURE($C$2:$C$26;1)
Pour ajouter un filtre, utilise une formule matricielle (à valider par shift+entrée)
Ex:
={QUARTILE.INCLURE(SI(B3:B27="b";$C$2:$C$26;"");1)}
Je ne sais plus pourquoi, mais j'utilise toujours ".value" :rolleyes:.
Je ne me souviens pas non plus avoir eu besoin un jour de ".text"....
Question d’habitudes...
Bonjour,
Dna sle fichier joint, execute la macro "Demo" (en espérant qu'elle fonctionne avec XL2007).
Option Explicit
Sub Demo()
Dim r As Range
Const MARQUEUR_DEBUT = "{{c1::"
Const MARQUEUR_FIN = "}}"
Dim Position_Debut As Integer
Dim Position_Fin As Integer
Dim...
Bonjour,
C'est pas forcément simple.
Dans le fichier ci-joint, regarde l'onglet liste colonne M.
Les autres colonnes expliquent la démarche. Elles peuvent être effacées.
Le gestionnaire de nom est utilisé pour construire des listes dynamiques et simplifier la présentation des formules.
On...
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.