Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

nb de car

36 réponses
Avatar
Jacquouille
Bonsoir

J'aimerais avoir la syntaxe en grand breton (pour vba) afin d'enlever le
dernier caractère de droite d'une cel.
Et connaître le num de chr pour le point.
Il me dit 46, mais c'est pas ça.
SVP

Voici l'idée:

Sub souligner_les_num()
For Each c In Range("a1:G363")
'c.Value = c.Value & Chr(7)

c.Value = Left(c, (Chr(c).Count - 1))

' ..... ligne précédente qui bloque


'c.Font.Underline = xlUnderlineStyleSingle
Next
End Sub

En vous remerciant
Bonne fin de soirée et surtout, bonne fête des cloches.
Jacques.


Jacquouille

" Le vin est au repas ce que le parfum est à la femme."


---
L'absence de virus dans ce courrier électronique a été vérifiée par le logiciel antivirus Avast.
http://www.avast.com

10 réponses

1 2 3 4
Avatar
isabelle
salut Jacques,

c.Value = Left(c, Len(c) - 1)

isabelle

Le 2015-04-03 16:01, Jacquouille a écrit :
Bonsoir

J'aimerais avoir la syntaxe en grand breton (pour vba) afin d'enlever le dernier
caractère de droite d'une cel.
Et connaître le num de chr pour le point.
Il me dit 46, mais c'est pas ça.
SVP

Voici l'idée:

Sub souligner_les_num()
For Each c In Range("a1:G363")
'c.Value = c.Value & Chr(7)

c.Value = Left(c, (Chr(c).Count - 1))

' ..... ligne précédente qui bloque


'c.Font.Underline = xlUnderlineStyleSingle
Next
End Sub

En vous remerciant
Bonne fin de soirée et surtout, bonne fête des cloches.
Jacques.


Jacquouille

" Le vin est au repas ce que le parfum est à la femme."

---
L'absence de virus dans ce courrier électronique a été vérifiée par le logiciel
antivirus Avast.
http://www.avast.com

Avatar
Jacquouille
Tant que tu es là, tu n'aurais pas le n° de chr du point, svp
Ici, il me donne le 46, mais
c.Value = c.Value & Chr(46)
ne donne rien. Le vide absolu
Merci pour le len(c)

Jacquouille

" Le vin est au repas ce que le parfum est à la femme."
"isabelle" a écrit dans le message de groupe de discussion :
mfmskg$tv9$

salut Jacques,

c.Value = Left(c, Len(c) - 1)

isabelle

Le 2015-04-03 16:01, Jacquouille a écrit :
Bonsoir

J'aimerais avoir la syntaxe en grand breton (pour vba) afin d'enlever le
dernier
caractère de droite d'une cel.
Et connaître le num de chr pour le point.
Il me dit 46, mais c'est pas ça.
SVP

Voici l'idée:

Sub souligner_les_num()
For Each c In Range("a1:G363")
'c.Value = c.Value & Chr(7)

c.Value = Left(c, (Chr(c).Count - 1))

' ..... ligne précédente qui bloque


'c.Font.Underline = xlUnderlineStyleSingle
Next
End Sub

En vous remerciant
Bonne fin de soirée et surtout, bonne fête des cloches.
Jacques.


Jacquouille

" Le vin est au repas ce que le parfum est à la femme."

---
L'absence de virus dans ce courrier électronique a été vérifiée par le
logiciel
antivirus Avast.
http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com





---
L'absence de virus dans ce courrier électronique a été vérifiée par le logiciel antivirus Avast.
http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com
Avatar
isabelle
tu as le bon code,
Range("A1") = "aaa" & Chr(46)
fonctionne bien
mais si c.Value est un chiffre le point n’apparait pas si il n'y a pas de décimal

isabelle


Le 2015-04-03 16:33, Jacquouille a écrit :
Tant que tu es là, tu n'aurais pas le n° de chr du point, svp
Ici, il me donne le 46, mais
c.Value = c.Value & Chr(46)
ne donne rien. Le vide absolu
Merci pour le len(c)

Jacquouille

" Le vin est au repas ce que le parfum est à la femme."
"isabelle" a écrit dans le message de groupe de discussion :
mfmskg$tv9$

salut Jacques,

c.Value = Left(c, Len(c) - 1)

isabelle

Le 2015-04-03 16:01, Jacquouille a écrit :
Bonsoir

J'aimerais avoir la syntaxe en grand breton (pour vba) afin d'enlever le dernier
caractère de droite d'une cel.
Et connaître le num de chr pour le point.
Il me dit 46, mais c'est pas ça.
SVP

Voici l'idée:

Sub souligner_les_num()
For Each c In Range("a1:G363")
'c.Value = c.Value & Chr(7)

c.Value = Left(c, (Chr(c).Count - 1))

' ..... ligne précédente qui bloque


'c.Font.Underline = xlUnderlineStyleSingle
Next
End Sub

En vous remerciant
Bonne fin de soirée et surtout, bonne fête des cloches.
Jacques.


Jacquouille

" Le vin est au repas ce que le parfum est à la femme."

---
L'absence de virus dans ce courrier électronique a été vérifiée par le logiciel
antivirus Avast.
http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com





---
L'absence de virus dans ce courrier électronique a été vérifiée par le logiciel
antivirus Avast.
http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com

Avatar
Jacquouille
P'tain.
Voilà donc pourquoi.
En fait, j'imprime des n° de tombola de 1 à 2541.
Je voulais mettre un point afin de différencier les 6 du 9, le 669 du 699
....
Tant pis, je vais mettre le chr 173. Un peu gros, mais tant pis.

Bises et encore merci
Jac


Jacquouille

" Le vin est au repas ce que le parfum est à la femme."
"isabelle" a écrit dans le message de groupe de discussion :
mfmttf$1eb$

tu as le bon code,
Range("A1") = "aaa" & Chr(46)
fonctionne bien
mais si c.Value est un chiffre le point n’apparait pas si il n'y a pas de
décimal

isabelle


Le 2015-04-03 16:33, Jacquouille a écrit :
Tant que tu es là, tu n'aurais pas le n° de chr du point, svp
Ici, il me donne le 46, mais
c.Value = c.Value & Chr(46)
ne donne rien. Le vide absolu
Merci pour le len(c)

Jacquouille

" Le vin est au repas ce que le parfum est à la femme."
"isabelle" a écrit dans le message de groupe de discussion :
mfmskg$tv9$

salut Jacques,

c.Value = Left(c, Len(c) - 1)

isabelle

Le 2015-04-03 16:01, Jacquouille a écrit :
Bonsoir

J'aimerais avoir la syntaxe en grand breton (pour vba) afin d'enlever le
dernier
caractère de droite d'une cel.
Et connaître le num de chr pour le point.
Il me dit 46, mais c'est pas ça.
SVP

Voici l'idée:

Sub souligner_les_num()
For Each c In Range("a1:G363")
'c.Value = c.Value & Chr(7)

c.Value = Left(c, (Chr(c).Count - 1))

' ..... ligne précédente qui bloque


'c.Font.Underline = xlUnderlineStyleSingle
Next
End Sub

En vous remerciant
Bonne fin de soirée et surtout, bonne fête des cloches.
Jacques.


Jacquouille

" Le vin est au repas ce que le parfum est à la femme."

---
L'absence de virus dans ce courrier électronique a été vérifiée par le
logiciel
antivirus Avast.
http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com





---
L'absence de virus dans ce courrier électronique a été vérifiée par le
logiciel
antivirus Avast.
http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com





---
L'absence de virus dans ce courrier électronique a été vérifiée par le logiciel antivirus Avast.
http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com
Avatar
Jacquouille
le chr(183) est mieux ....



Jacquouille

" Le vin est au repas ce que le parfum est à la femme."
"Jacquouille" a écrit dans le message de groupe de discussion :
mfmu7u$270$

P'tain.
Voilà donc pourquoi.
En fait, j'imprime des n° de tombola de 1 à 2541.
Je voulais mettre un point afin de différencier les 6 du 9, le 669 du 699
....
Tant pis, je vais mettre le chr 173. Un peu gros, mais tant pis.

Bises et encore merci
Jac


Jacquouille

" Le vin est au repas ce que le parfum est à la femme."
"isabelle" a écrit dans le message de groupe de discussion :
mfmttf$1eb$

tu as le bon code,
Range("A1") = "aaa" & Chr(46)
fonctionne bien
mais si c.Value est un chiffre le point n’apparait pas si il n'y a pas de
décimal

isabelle


Le 2015-04-03 16:33, Jacquouille a écrit :
Tant que tu es là, tu n'aurais pas le n° de chr du point, svp
Ici, il me donne le 46, mais
c.Value = c.Value & Chr(46)
ne donne rien. Le vide absolu
Merci pour le len(c)

Jacquouille

" Le vin est au repas ce que le parfum est à la femme."
"isabelle" a écrit dans le message de groupe de discussion :
mfmskg$tv9$

salut Jacques,

c.Value = Left(c, Len(c) - 1)

isabelle

Le 2015-04-03 16:01, Jacquouille a écrit :
Bonsoir

J'aimerais avoir la syntaxe en grand breton (pour vba) afin d'enlever le
dernier
caractère de droite d'une cel.
Et connaître le num de chr pour le point.
Il me dit 46, mais c'est pas ça.
SVP

Voici l'idée:

Sub souligner_les_num()
For Each c In Range("a1:G363")
'c.Value = c.Value & Chr(7)

c.Value = Left(c, (Chr(c).Count - 1))

' ..... ligne précédente qui bloque


'c.Font.Underline = xlUnderlineStyleSingle
Next
End Sub

En vous remerciant
Bonne fin de soirée et surtout, bonne fête des cloches.
Jacques.


Jacquouille

" Le vin est au repas ce que le parfum est à la femme."

---
L'absence de virus dans ce courrier électronique a été vérifiée par le
logiciel
antivirus Avast.
http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com





---
L'absence de virus dans ce courrier électronique a été vérifiée par le
logiciel
antivirus Avast.
http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com





---
L'absence de virus dans ce courrier électronique a été vérifiée par le
logiciel antivirus Avast.
http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com


---
L'absence de virus dans ce courrier électronique a été vérifiée par le logiciel antivirus Avast.
http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://www.avast.com
Avatar
isabelle
mets le code 96 à la place (c'est l'accent grave `)
isabelle

Le 2015-04-03 16:46, Jacquouille a écrit :
P'tain.
Voilà donc pourquoi.
En fait, j'imprime des n° de tombola de 1 à 2541.
Je voulais mettre un point afin de différencier les 6 du 9, le 669 du 699 ....
Tant pis, je vais mettre le chr 173. Un peu gros, mais tant pis.

Bises et encore merci
Jac


Jacquouille
Avatar
Jacquouille
Pas beau. C'est trop grâve. -))
Pour le point, un format de cel perso n'irait pas
J'essaierai demain.
Bonne soirée et encore merci


Jacquouille

" Le vin est au repas ce que le parfum est à la femme."
"isabelle" a écrit dans le message de groupe de discussion :
mfmum0$333$

mets le code 96 à la place (c'est l'accent grave `)
isabelle

Le 2015-04-03 16:46, Jacquouille a écrit :
P'tain.
Voilà donc pourquoi.
En fait, j'imprime des n° de tombola de 1 à 2541.
Je voulais mettre un point afin de différencier les 6 du 9, le 669 du 699
....
Tant pis, je vais mettre le chr 173. Un peu gros, mais tant pis.

Bises et encore merci
Jac


Jacquouille




---
L'absence de virus dans ce courrier électronique a été vérifiée par le logiciel antivirus Avast.
http://www.avast.com
Avatar
isabelle
bonne idée le format de cel perso

Cells(1, 1).NumberFormat = "#,##0""."""

isabelle

Le 2015-04-03 17:19, Jacquouille a écrit :
Pas beau. C'est trop grâve. -))
Pour le point, un format de cel perso n'irait pas
J'essaierai demain.
Bonne soirée et encore merci


Jacquouille
Avatar
isabelle
ou comme ça pour un format sans l'espace de millier

Cells(1, 1).NumberFormat = "###0""."""

isabelle

Le 2015-04-03 22:04, isabelle a écrit :
bonne idée le format de cel perso

Cells(1, 1).NumberFormat = "#,##0""."""

isabelle

Le 2015-04-03 17:19, Jacquouille a écrit :
Pas beau. C'est trop grâve. -))
Pour le point, un format de cel perso n'irait pas
J'essaierai demain.
Bonne soirée et encore merci


Jacquouille
Avatar
Jacquouille
Aaaaah que je suis bon. -))
Merci, Divine Isa Belle.
Que les cloches t'apportent une tonne de petits œufs au chocolat.

Jacques.


Jacquouille

" Le vin est au repas ce que le parfum est à la femme."
"isabelle" a écrit dans le message de groupe de discussion :
mfngre$68v$

bonne idée le format de cel perso

Cells(1, 1).NumberFormat = "#,##0""."""

isabelle

Le 2015-04-03 17:19, Jacquouille a écrit :
Pas beau. C'est trop grâve. -))
Pour le point, un format de cel perso n'irait pas
J'essaierai demain.
Bonne soirée et encore merci


Jacquouille




---
L'absence de virus dans ce courrier électronique a été vérifiée par le logiciel antivirus Avast.
http://www.avast.com
1 2 3 4