Excel- copier-coller cellule sans espace en fonction du %

Y compris Power BI, Power Query et toute autre question en lien avec Excel
D
Dianekhazaka
Jeune membre
Jeune membre
Messages : 27
Inscrit le : 17 novembre 2017
Version d'Excel : 2010

Message par Dianekhazaka » 18 novembre 2019, 16:56

Bonjour,

Je veux savoir à partir du fichier que j'ai attaché comment, en fonction du pourcentage attribué dans la colonne C entre les lignes 88 et 142, transposer les pistes d'action qui sont 0% dans la colonne C, dans l'encadré gris soit entre B37 et C92 tout en supprimant les espaces entre les lignes.
Diag_LHG_Vf - Copie.xlsm
(109.9 Kio) Téléchargé 5 fois
Merci d'avance
Avatar du membre
curulis57
Passionné d'Excel
Passionné d'Excel
Messages : 3'272
Appréciations reçues : 147
Inscrit le : 4 janvier 2016
Version d'Excel : 2016 FR / 2019 FR

Message par curulis57 » 20 novembre 2019, 03:12

Salut Diane,

quelque chose comme ça ?
Les données en [B37:C85] s'effacent avant chaque calcul.
A tester et corriger selon d'autres indications plus exhaustives !!
Private Sub cmdGO_Click()
'
Dim iRow%
'
On Error Resume Next
Application.ScreenUpdating = False
'
iRow = Cells.Find(what:="Pistes d'actions", lookat:=xlPart, LookIn:=xlValues, searchdirection:=xlNext).Row
Range("B37:C" & iRow - 2).Value = ""
iRowT = 36
For x = Range("C" & Rows.Count).End(xlUp).Row To iRow + 1 Step -1
    If Range("C" & x).NumberFormat = "0%" And Range("C" & x).Value = 0 And UCase(Range("C" & x).Value) <> "FAUX" Then
        iRowT = iRowT + 1
        Range("B" & iRowT & ":C" & iRowT).Value = Range("B" & x & ":C" & x).Value
    End If
Next
Range("C37:C" & iRowT).NumberFormat = "0%"
'
Application.ScreenUpdating = True
On Error GoTo 0
'
End Sub
8-)
A+
Diag_LHG_Vf.xlsm
(113.72 Kio) Téléchargé 3 fois
D
Dianekhazaka
Jeune membre
Jeune membre
Messages : 27
Inscrit le : 17 novembre 2017
Version d'Excel : 2010

Message par Dianekhazaka » 20 novembre 2019, 10:24

Bonjour,

Merci pour ta réponse.
Oui c'est dans ce style mais sans avoir les % juste les pistes d'actions concernées stp. Et je voulais savoir si c'est possible de rajouter une condition de format :
- si le % attribuer à une piste d'actions < 10% je veux que les cellules apparaissent en orange dans l'encadré B46 à B100
- si le % attribuer à une piste d'actions < 20% je veux que les cellules apparaissent en rouge dans l'encadré B46 à B100

merci d'avance.
Avatar du membre
curulis57
Passionné d'Excel
Passionné d'Excel
Messages : 3'272
Appréciations reçues : 147
Inscrit le : 4 janvier 2016
Version d'Excel : 2016 FR / 2019 FR

Message par curulis57 » 20 novembre 2019, 23:18

Salut Diane,

ainsi, avec MFC... ?

:btres:

8-)
A+
Diag_LHG_Vf.xlsm
(114.95 Kio) Téléchargé 1 fois
D
Dianekhazaka
Jeune membre
Jeune membre
Messages : 27
Inscrit le : 17 novembre 2017
Version d'Excel : 2010

Message par Dianekhazaka » Hier, 18:33

Bonjour,

Je veux savoir comment il serait possible de copier coller le contenu des cellules C4 à C50 de l'onglet PL1 à partir de la note présente dans les cellules D4 à D50 (soit inférieur à 20%) de ce même onglet dans l'onglet PLAN de PROGRES à partir de la celulle B11.

Merci d'avance
OUTIL.xlsm
(35.24 Kio) Pas encore téléchargé
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message