case a cocher avec cellule fusionée Fermé

Question

Bonjour, 

je suis novice en vba, j'aimerai clique sur une cellule qui est fussione et qu'une coche apparaise. J'ai trouve des codes vba qui fonctionne mais sans les cellules fusionne.

Pouvez vous m'aide svp
nico 

Configuration: Windows 7 / Firefox 20.0

f894009 · Answer

Bonjour,

interseption Worksheet_SelectionChange ne marche pas sur cellules fusionnees. Par contre Worksheet_BeforeRightClick marche. A vous de voir

nico131 · Answer

Slt tu me conseille de changer ma ligne de commande ok 


Tu as pas un code complet a tout a hazard.

Saurait tu par hazard quel code utilise pour numerote page style 1/2 en foncyion du nombre d.impression.
Merci d.avance

f894009 · Answer

Bonjour,

exemple case a cocher sur click droit souris: feuil1

https://www.cjoint.com/c/CEvjmK6AzAs

nico131 · Answer

je te remercie pour ce code je l'ai modifie pour des symboles qui me plaisait mieux.

J'aimerai aussi toujours avec une cellules fusionnées, pouvoir mettre en automatique la taille de la police existe t'il macro pour sa.

Et est ce que tu sais pour la numerotation de page 

Je te remercie par avance et deja un grand merci pour ton aide

f894009 · Answer

Bonjour,

numerotation page: excel 2007 et plus   https://www.cjoint.com/c/CEwhDJhtsaC

pour 2003  sensiblement pareil, c'est aussi dans mise en page

taille police cellules fusionnees: exemple fait avec l'enregistreur de macro (pensez a cet enregistreur de macro)

Sub Macro1()
'
' Macro1 Macro
'
    'cellules A3 et B3 fusionnees
    Range("A3:B3").Select
    With Selection.Font
        .Name = "Arial Rounded MT Bold"
        .Size = 26
        .Strikethrough = False
        .Superscript = False
        .Subscript = False
        .OutlineFont = False
        .Shadow = False
        .Underline = xlUnderlineStyleNone
        .ThemeColor = xlThemeColorLight1
        .TintAndShade = 0
        .ThemeFont = xlThemeFontNone
        .Bold = False
    End With
End Sub

bonne suite

nico131 · Answer

ok je te remercie
 pour la numerotation j'aimerais sa dans une cellule

et pour la taille de la cellule j'aimerais que quand j'ecris un petit mot la taille de police s'agrandisse en fonction de ma cellule et que inversement ca ajuste la taille lorque c'est trop grand.
Actuellement j'utilise la fonction ajuste dans excel mais sa me convien tpas trop.

f894009 · Answer

Re,

numero page dans cellules:https://www.developpez.net/forums/d447585/logiciels/microsoft-office/excel/insertion-n-page-cellule/

Actuellement j'utilise la fonction ajuste dans excel mais sa me convien tpas trop. a ce train la vous allez reprogrammer toutes les fonctions d'excel!!!!!

nico131 · Answer

je te remercie de nouveauce code laz pour la numerotation je l'avais trouve.

Je vais essaye de mieux m'explique:

j'ai creer une macro pour imprime ( avec un bouton) le nombre de page selon le nombre qu'on rentre dans une cellule. J'aimerais dans l'ideal qu'une page s'imprime normalement( sans rien car j'ai besoin d'une feuille puor classer dans archive et les autre que je mert pour identifie des pallete)
 et sur les autres il y a une numerotation de page style 1/2, 2/2

Si tu veux je t'envoi mon fichier pour mieu comprendre, mais il faut m'explique.

d'habitude j'arrive en m'en sortir dans la programation en regardant sur le net mais la j'ai vraiment rien pige pour le code vga.

f894009 · Answer

Bonjour,

pour mettre un fichier (sans donnees confidentielles) a disposition, click sur le lien suivant https://www.cjoint.com/ 
Ne pas oublier de copier/coller le lien cree dans le prochain message

nico131 · Answer

https://www.cjoint.com/c/CEwusPMf5Tx

en te remerciant de ton aide. j'apprecie vraiment du temps que tu passe pour un inconnu. 

du coup je repose tous me eespor sur toi

f894009 · Answer

Bonjour,

regardez si cela vous convient: j'ai change la cellule de saisie nombre de palette (voir commentaire cellules)

https://www.cjoint.com/c/CExjTqICuSI

adaptez a votre besoin

nico131 · Answer

je te remercie enormeemt, j'ai modifie a ma convenance je te remercie encore.

ps un dernier truc il doit bien existe un code pour active la macro automaitquement

merci encore

f894009 · Answer

Bonjour,

un code pour active la macro automaitquement  detaillez le besoin svp

nico131 · Answer

slt
je te remercie encore une fois le programme marche tres bien apes un mois d'utilisation. juste j'aimerais si possible c'est lorque je clique sur imprimer tout ce que j'ai ecrit ou cliquez s'efface
merci encore pour ton aide

f894009 · Answer

Bonjour,

code a mettre juste avant le End Sub du code pour l'impression.

    'RAZ des champs saisies et coches
    Range("J40:J42,J37:J39,J34:J36,J31:J33,J28:J30,J25:J27,J22:J24").ClearContents
    Range("F13,H13,F15:H16,F18:H19,C24:C26,E24:E26,C28:C30,C32:C34").ClearContents
    Range("A42:E43").ClearContents

Bonne suite

Case a cocher avec cellule fusionée

15 réponses

Discussions similaires