Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Bonjour job75,
Je mets le code dans la feuille "Maison"
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Sh.Name = "Maison" Then
Application.WindowState = xlNormal
Application.Width = 720 ' définit la largeur
Application.Height = 780 'définit la hauteur
ActiveWindow.Zoom = 92
End Sub...
Bonjour à tous,
Je souhaiterais intégrer des codes VBA afin d'ouvrir les feuilles d'un classeur avec des dimensions différentes.
Est-il possible de réaliser cela ?
Les noms des feuilles sont : Maison - Charges - Véhicules...
Dans "ThisWorkbook", j'ai ce code :
Private Sub...
Re-bonjour à tous.
Gégé-45550 merci, ça marche en plus maintenant la recherche se fait sur toute la feuille ! ;)
Si vous avez une idée pour :
- Pour mettre un petit message d'erreur s'il ne trouve pas le mot.
Merci beaucoup pour votre aide. c'est super.
Cordialement.
David.
Re-bonjour à tous, Gégé-45550, Staple1600,
Merci pour vos arguments qui sont très pertinents et que je respecte totalement.
En utilisant l'outil "rechercher et remplacer" dans une cellule directement sur une feuille, je souhaite simplement trouver un moyen qui me paraît plus rapide (ce n'est...
Re,
Pour me simplifier la vie. Malheureusement, je n'ai pas le savoir-faire pour écrire ses lignes. Dommage.
Mais je comprends vos arguments.
Merci.
Cordialement.
David.
Bonjour à tous,
Je souhaiterais intégrer le code VBA de l'outil "rechercher et remplacer" dans la cellule "G4" !
Mettre le mot à rechercher dans la cellule "G4" et appuyer sur "entrer" afin de trouver rapidement le mot sans devoir ouvrir l'outil.
Merci de votre aide.
Bonne journée...
Bonjour à tous,
J'ai un code qui fonctionne sur toute une feuille et je souhaiterais que ce code ne fonctionne que sur des plages de cellules sélectionnées.
Voilà les plages des cellules :
("B7:K88")
("B95:K134")
("B147:K228")
("B235:K274")
("B287:K368")
("B375:K414")
("B427:K508")...
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.