> Tous les forums > Forum Bureautique
 Ecrir par macro dans des cellules différents
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
crisadon
  Posté le 08/01/2015 @ 17:14 
Aller en bas de la page 
Nouvel astucien

Bonjour à tous

Voila mon problème: pour renseigner des champs pour publipostage rapidement, j'ai quelques textes pré ecrits que je peux appeler sur mon fichier via une macro.

jusque la je m'en sorts honorablement.

mais dans un souci d’optimisation des manipulations (comme toujours), dans certain cas j'aurais besoin de remplir en automatique plusieurs champs en une seule macro.

Ma macro de base la voila :

Selection.FormulaR1C1 = "texte 1 "
SendKeys "{TAB}"

An cliquant sur mon bouton auquel j'ai affecté cette macro, le texte 1 s'écrit de suite dans la cellule et fait une tabulation pour remplir la cellule suivante. comme je vous le disais, je m'en sorts honorablement.

Seulement, je cherche comment faire pour écrire un texte1 dans une cellule déjà sélectionnée, faire une tabulation, écrire une texte2 dans la cellule immédiatement à droite de la première, refaire une tabulation, etc au gré des besoins.

ha j'oubliai : j'ai excel 2013.

J'aurais bien fait comme avant en enregistrant les cliques successifs sur les deux boutons concernés ... mais ça c'était avant.

je ne sais pas comment faire.

quelqu'un aurait il une solution s'il vous plait

Merci d'avance

Publicité
ferrand
 Posté le 08/01/2015 à 21:44 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

Bonsoir,

Ce que devrait pouvoir faire ta macro :

Macro
Compter les textes à affecter : nombre affecté à une variable (soit n)
[à moins qu'on connaisse ce nombre à l'avance...]
Recueillir les textes dans une variable tableau : on devrait pouvoir utiliser une boucle,genre :
For i = 1 to n
tx(i-1) = (texte i) [faut savoir où sont les textes...]
Ensuite il n'y a plus qu'à les mettre où il faut :
With ActiveCell
For i = 0 to n-1
.Offset(0, i).Value = tx(i)
Next i
End With

crisadon
 Posté le 08/01/2015 à 22:57 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvel astucien

Bonsoir Ferrand

Merci pour ta réponse . Je vais essayer cela dès que possible et si ça marche : !!!

Je ferai état du résultat (pas avant lundi).

bonne nuit

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !
Recevoir PC Astuces par e-mail


La Lettre quotidienne +226 000 inscrits
Avec l'actu, des logiciels, des applis, des astuces, des bons plans, ...

Les bonnes affaires
Une fois par semaine, un récap des meilleurs offres.

Les fonds d'écran
De jolies photos pour personnaliser votre bureau. Une fois par semaine.

Les nouveaux Bons Plans
Des notifications pour ne pas rater les bons plans publiés sur le site.

Les bons plans du moment PC Astuces

Tous les Bons Plans
149,90 €Carte mère MSI MPG Z590 Pro WiFi à 149,90 €
Valable jusqu'au 28 Janvier

RueDuCommerce fait une promotion sur la carte mère MSI MPG Z590 Pro WiFi à 149,90 € au lieu de 220 €.  La carte mère MSI Z590 PRO WIFI est conçue pour accueillir les processeurs Intel sur socket LGA 1200. Elle permettra l'assemblage d'une configuration puissante et polyvalente capable de s'acquitter de toutes les tâches. Gaming, Streaming, multitâche intensif, création multimédia, c'est la solution idéale pour concevoir un PC haut de gamme ultra-performant. Elle prend en outre en charge la RAM DDR4, les cartes graphiques PCI-Express 4.0 16x, les disques SATA 6 Gb/s et M.2 PCIe 4.0 et les périphériques USB 3.1 et USB 3.2. 


> Voir l'offre
57,89 €Kit de 16 Go (2 x 8 Go) de mémoire DDR4 PNY XLR8 3200 MHz à 57,89 €
Valable jusqu'au 28 Janvier

Cdiscount fait une promotion sur le kit de 16 Go (2x8 Go) de mémoire DDR4 PNY XLR8 3200 MHz CL16 qui passe à 57,89 € alors qu'on le trouve ailleurs à plus de 70 €. La version 32 Go (2x16 Go) est également en promotion à 102,99 € au lieu de 140 €.


> Voir l'offre
18,90 €Carte mémoire SDXC UHS-I U3 SanDisk Extreme 128 Go (jusqu'à 160 Mo/s) à 18,90 €
Valable jusqu'au 28 Janvier

Cdiscount fait une belle promotion sur la carte mémoire SDXC UHS-I U3 SanDisk Extreme Plus d'une capacité de 128 Go qui passe à 18,90 € alors qu'on trouve la carte ailleurs à partir de 30 €. Cette carte mémoire offre des vitesses jusqu'à 160 Mo/s en lecture et 90 Mo/s en écriture et intègre des mécanismes afin de gérer l'usure des cellules de la carte et augmenter ainsi sa durée de vie. Une valeur sûre pour les plus exigeants.

Elle résiste aux températures extrêmes, à l'eau, aux chocs et aux rayons X.


> Voir l'offre

Sujets relatifs
selectionner des cellules dans une macro
Définir une Plage de cellules dans une macro
Définir 1 plage de cellules dans 1 macro excel
2 pages par feuille dans macro excel
[Extraction dans cellules]
Creation d' une boucle macro dans fichier EXCEL pour impression
Relier des choix à des cellules dans excel
macro afficher masquer lignes tableau dans word 2010
Comment savoir le nb des mêmes valeurs dans 2 tab differents
[chemin relatif dans une macro]
Plus de sujets relatifs à Ecrir par macro dans des cellules différents
 > Tous les forums > Forum Bureautique