Forums XLPages

Tous les messages (Eric)

1 2 3 4 ... 11 »
Re: Différentes police dans une même cellule
#1
Semi pro XLPages

Inscription: 12/06/2008
De Ile de France Sud

Messages: 102

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 24-04 18h59

Re

 

Attention magouiller n'est peut-être pas la bonne solution wink, il faut être rigoureux.

 

Si tu gardes les mêmes couleurs, je pense que tu peux n'avoir qu'une procédure en adaptant avec des variables.

 

Si tu as un problème, n'hésite pas

 

A+

 

Eric

 

 

Hors Ligne
Rapport   Haut 

Re: Différentes police dans une même cellule
#2
Semi pro XLPages

Inscription: 12/06/2008
De Ile de France Sud

Messages: 102

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 24-04 09h42

Bonjour à toutes et tous
Bonjour François

 

Voilà une très bonne nouvelle.

 

Bonne journée
Eric

Hors Ligne
Rapport   Haut 

Re: Différentes police dans une même cellule
#3
Semi pro XLPages

Inscription: 12/06/2008
De Ile de France Sud

Messages: 102

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 23-04 17h45

Bonjour tout le monde

 

Quelles sont les manipulations que tu exécutes sur ce fichier ? Perso je change les choix dans la liste qui se situe en "O149", ce qui modifie les résultats de la cellule "AD153".

 

J'ai repris ton fichier et je le joins : "Suivi étapes assemblagetest_03_Eric.xlsm". Il fonctionne chez moi.

- Teste le avant de modifier quoique ce soit.

- Si tu dois corriger la formule en "AD153", STP modifie UNIQUEMENT les références (adresses) des cellules et non le nombre d'espaces.

- Ne mets pas de formule dans la forme "rectangle 17" du type "=AD153".

 

A+

Eric

Pièce jointe:
xlsm Suivi étapes assemblagetest_03_Eric.xlsm   [ Taille: 78.08 Ko - Téléchargements: 11 ]
Hors Ligne
Rapport   Haut 

Re: Différentes police dans une même cellule
#4
Semi pro XLPages

Inscription: 12/06/2008
De Ile de France Sud

Messages: 102

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 19-04 10h55

Re

 

Je ne dois pas comprendre le mode de ton fichier.

 

Le test que je fais est la modification de la liste en cellule "O149". Est ce le bon test ? sinon dis moi ce que je dois faire.

 

Eric

Hors Ligne
Rapport   Haut 

Re: Différentes police dans une même cellule
#5
Semi pro XLPages

Inscription: 12/06/2008
De Ile de France Sud

Messages: 102

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 17-04 21h17

Bonsoir

 

Ci-joint ton dernier fichier qui fonctionne. A tester quand même ....

 

A+

 

Eric

Pièce jointe:
xlsm Suivi étapes assemblagetest_modif_F_01.xlsm   [ Taille: 73.47 Ko - Téléchargements: 6 ]
Hors Ligne
Rapport   Haut 

Re: Différentes police dans une même cellule
#6
Semi pro XLPages

Inscription: 12/06/2008
De Ile de France Sud

Messages: 102

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 12-04 18h13

Bonsoir

 

L'erreur vient de ce que tu as modifié la formule. Tu as supprimé des "  " et autres "&"

 

En plus tu as supprimé ceci :

Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
If val_cel = True Then val_cel = False: Exit Sub
lance
Application.ScreenUpdating = True
End Sub

sans ce code cela ne peut pas fonctionner.

 

Est ce la dernière formule qui est dans ton fichier ? si oui, j'adapterai sur ton fichier.

 

A te lire

Eric

Hors Ligne
Rapport   Haut 

Re: Recherche des espaces dans une cellule de texte
#7
Semi pro XLPages

Inscription: 12/06/2008
De Ile de France Sud

Messages: 102

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 09-04 19h32

Bonsoir à toutes et tous

Bonsoir PAD

 

Si c'est toujours d'actualité, peux tu essayer ceci :

=SI(ESTERREUR((CHERCHE(" ";A2;1)))="FAUX";"";"espace")

Dis nous

Eric

 

Hors Ligne
Rapport   Haut 

Re: Différentes police dans une même cellule
#8
Semi pro XLPages

Inscription: 12/06/2008
De Ile de France Sud

Messages: 102

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 09-04 14h57

Bonjour à toutes et tous
Bonjour François

 

C'est bien ce qu'il me semblait. Essaie ce code :

Sub lance()
Dim tablo

' dechet bleu
' rempl vert
' sav rouge
' solde jaune
' violet total

If IsError(Range("AD1")) Then val_cel = True: Range("AD15").Value = "": Exit Sub
tablo = Split(Range("AD1").Value, ":")
tablo_01 = Split(Mid(Range("AD1"), Len(tablo(0)) + 3), "       ")
t0 = tablo_01(0)    ' rempl
tablo_02 = Split(tablo_01(1), "  ")
t1 = tablo_02(0)    ' dechet
t2 = tablo_02(1)    ' soldes
tablo_03 = Split(tablo_01(2), "  ")
t3 = tablo_03(0)    ' sav
t4 = tablo_03(1)    ' total

val_cel = True

ActiveSheet.Shapes("Rectangle 17").Select   ' il serait bon de donner un nom à cette forme
Selection.ShapeRange.TextFrame2.TextRange.Font.Size = 10
With Selection
    .Characters.Text = Range("AD1").Value   ' cellule où est située la formule : AD15, AD153, ..... à toi d'adapter
    .Characters.Font.ColorIndex = 0 ' titre
    .Characters(Start:=Len(tablo(0)), Length:=Len(t0) + 3).Font.ColorIndex = 50  ' rempl
    .Characters(Start:=Len(tablo(0)) + Len(t0) + 10, Length:=Len(t1)).Font.ColorIndex = 41 ' dechet
    .Characters(Start:=Len(tablo(0)) + Len(t0) + 10 + Len(t1) + 2, Length:=Len(t2)).Font.ColorIndex = 44 ' soldes
    .Characters(Start:=Len(tablo(0)) + Len(t0) + 10 + Len(t1) + 2 + Len(t2) + 7, Length:=Len(t3)).Font.ColorIndex = 3 ' sav
    .Characters(Start:=Len(tablo(0)) + Len(t0) + 10 + Len(t1) + 2 + Len(t2) + 7 + Len(t3) + 2, Length:=Len(t4)).Font.ColorIndex = 7 ' total
End With

val_cel = False
Range("N10").Select
End Sub

 

 

Dis nous

Eric

Hors Ligne
Rapport   Haut 

Re: Différentes police dans une même cellule
#9
Semi pro XLPages

Inscription: 12/06/2008
De Ile de France Sud

Messages: 102

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 06-04 09h54

Bonjour à toutes et tous
Bonjour François

 

".... ça marche nickel ..." c'est toujours agréable de lire cela wink

 

Pour la zone de texte, c'est possible, mais laisse moi un petit peu de temps .....  Auras tu également besoin du résultat dans la cellule "AD15" ou "153" ou .... ?

 

Pour le bouton "résolu" regarde ce lien :
http://www.mdf-xlpages.com/modules/smartfaq/faq.php?faqid=29

 

A+
Eric

 

Hors Ligne
Rapport   Haut 

Re: Différentes police dans une même cellule
#10
Semi pro XLPages

Inscription: 12/06/2008
De Ile de France Sud

Messages: 102

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 05-04 19h05

Bonsoir à toutes et tous

Bonsoir François

 

Tu trouveras dans le fichier joint des explications plus claires, j'espère. Il te reste à faire les adaptations si tu changes de cellules. 

Après, il suffit seulement de modifier le TCD et le résultat se met à jour. 

A te lire
Eric

 

Pièce jointe:
xlsm Suivi étapes assemblage_Eric_01.xlsm   [ Taille: 57.08 Ko - Téléchargements: 17 ]
Hors Ligne
Rapport   Haut 

1 2 3 4 ... 11 »