Bonjour
J'ai cette syntaxe qui me permet d'adapter la taille de la cellule :
ActiveCell.EntireRow.AutoFit
au départ, je souhaite avoir une largeur pour toutes mes lignes de 42,75
je souhaite écrire en VBA :
Si (au contenu des éléments dans la cellule) la largeur est < 42,75 alors
laissez 42,75, sinon ActiveCell.EntireRow.AutoFit
Merci beaucoup
Michel
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
anomymousA
bonjour,
ActiveCell.EntireRow.AutoFit if ActiveCell.RowHeight > 42.75 then else ActiveCell.RowHeight = 42.75 end if
A+
Bonjour J'ai cette syntaxe qui me permet d'adapter la taille de la cellule : ActiveCell.EntireRow.AutoFit au départ, je souhaite avoir une largeur pour toutes mes lignes de 42,75 je souhaite écrire en VBA : Si (au contenu des éléments dans la cellule) la largeur est < 42,75 alors laissez 42,75, sinon ActiveCell.EntireRow.AutoFit Merci beaucoup Michel
bonjour,
ActiveCell.EntireRow.AutoFit
if ActiveCell.RowHeight > 42.75 then
else
ActiveCell.RowHeight = 42.75
end if
A+
Bonjour
J'ai cette syntaxe qui me permet d'adapter la taille de la cellule :
ActiveCell.EntireRow.AutoFit
au départ, je souhaite avoir une largeur pour toutes mes lignes de 42,75
je souhaite écrire en VBA :
Si (au contenu des éléments dans la cellule) la largeur est < 42,75 alors
laissez 42,75, sinon ActiveCell.EntireRow.AutoFit
Merci beaucoup
Michel
ActiveCell.EntireRow.AutoFit if ActiveCell.RowHeight > 42.75 then else ActiveCell.RowHeight = 42.75 end if
A+
Bonjour J'ai cette syntaxe qui me permet d'adapter la taille de la cellule : ActiveCell.EntireRow.AutoFit au départ, je souhaite avoir une largeur pour toutes mes lignes de 42,75 je souhaite écrire en VBA : Si (au contenu des éléments dans la cellule) la largeur est < 42,75 alors laissez 42,75, sinon ActiveCell.EntireRow.AutoFit Merci beaucoup Michel
Michel.Girard
Merci beaucoup, c'est exactement cela Michel P.S. anomymousA bizarre comme pseudo ;-))
"anomymousA" a écrit dans le message de news:
bonjour,
ActiveCell.EntireRow.AutoFit if ActiveCell.RowHeight > 42.75 then else ActiveCell.RowHeight = 42.75 end if
A+
Bonjour J'ai cette syntaxe qui me permet d'adapter la taille de la cellule : ActiveCell.EntireRow.AutoFit au départ, je souhaite avoir une largeur pour toutes mes lignes de 42,75 je souhaite écrire en VBA : Si (au contenu des éléments dans la cellule) la largeur est < 42,75 alors laissez 42,75, sinon ActiveCell.EntireRow.AutoFit Merci beaucoup Michel
Merci beaucoup, c'est exactement cela
Michel
P.S. anomymousA bizarre comme pseudo ;-))
"anomymousA" <anomymousA@discussions.microsoft.com> a écrit dans le message
de news: 5FBFFB05-DCE8-4084-AA24-4301C121087C@microsoft.com...
bonjour,
ActiveCell.EntireRow.AutoFit
if ActiveCell.RowHeight > 42.75 then
else
ActiveCell.RowHeight = 42.75
end if
A+
Bonjour
J'ai cette syntaxe qui me permet d'adapter la taille de la cellule :
ActiveCell.EntireRow.AutoFit
au départ, je souhaite avoir une largeur pour toutes mes lignes de 42,75
je souhaite écrire en VBA :
Si (au contenu des éléments dans la cellule) la largeur est < 42,75
alors
laissez 42,75, sinon ActiveCell.EntireRow.AutoFit
Merci beaucoup
Michel
Merci beaucoup, c'est exactement cela Michel P.S. anomymousA bizarre comme pseudo ;-))
"anomymousA" a écrit dans le message de news:
bonjour,
ActiveCell.EntireRow.AutoFit if ActiveCell.RowHeight > 42.75 then else ActiveCell.RowHeight = 42.75 end if
A+
Bonjour J'ai cette syntaxe qui me permet d'adapter la taille de la cellule : ActiveCell.EntireRow.AutoFit au départ, je souhaite avoir une largeur pour toutes mes lignes de 42,75 je souhaite écrire en VBA : Si (au contenu des éléments dans la cellule) la largeur est < 42,75 alors laissez 42,75, sinon ActiveCell.EntireRow.AutoFit Merci beaucoup Michel
