Microsoft 365 symboles dans listes de données

  • Initiateur de la discussion Initiateur de la discussion perrmi
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

perrmi

XLDnaute Occasionnel
bonjour a vous tous
le soleil est de la partie🙂
petit problème a la suite de mon précédent post
un tableau avec une liste de données.
le symboles ? représentant une caractéristique n'est pas coller aux noms mais a la ligne suivante.
j'aimerais juste supprimer cette ligne et accoler le symbole au nom de la ligne précédente.
un fichier joint sera plus explicite
encore merci a vous de voir les possibilité
macro ou formules
perrmi
 

Pièces jointes

Vous pouvez toujours remplacer la macro évènementielle par une macro classique affectée au bouton.

Si elle doit servir pour toutes les feuilles il faut une boucle sur les feuilles :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim P As Range, i&, j&
Application.ScreenUpdating = True
Set P = [A1].CurrentRegion.Resize(, 13)
With [A38].Resize(P.Rows.Count, 13) 'à adapter
.Value = P.Value 'copie les valeurs
For i = 2 To .Rows.Count
If Len(.Cells(i, 2)) = 1 Then
.Cells(i - 1, 2) = .Cells(i - 1, 2) & .Cells(i, 2)
For j = i + 1 To .Rows.Count
.Rows(j - 1) = .Rows(j).Value 'décale vers le haut
Next j
.Rows(j - 1).ClearContents
End If
Next i
End With
End Sub
merci a vous de votre rapidité
c'est parfait vraiment ce que je recherchais
vous etes doué ,encore mes félicitations.
vous etes dans l'informatique? passionné d'Excel et VBA?
en tout cas encore merci.
perrmi
 
merci a vous de votre rapidité
c'est parfait vraiment ce que je recherchais
vous etes doué ,encore mes félicitations.
vous etes dans l'informatique? passionné d'Excel et VBA?
en tout cas encore merci.
perrmi
Derniére petite question et je vous laisse tranquille🙂
capture d'écran ci jointe
comment copier votre macro dans ma feuille Excel ci dessus
merci.
le but est d'insérer un bouton avec votre macro sur certains onglets de mon fichier
 

Pièces jointes

  • COPIE .png
    COPIE .png
    62.2 KB · Affichages: 9
Dernière édition:
Bonjour
je vais tenter de résoudre mon dernier soucis
pour le Array je dois créer un module ? ou s'inscrit :
For Each w In Sheets(Array("Feuil1", "Feuil2", "Feuil3", "Feuil4", "Feuil5"))
je suis novice ou positionner ce Array?
merci encore et bonne jpurnée
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Retour