Besoin d'une macro pour gagner du temps

barnabe0057 Messages postés 14455 Date d'inscription   Statut Contributeur Dernière intervention   -  
barnabe0057 Messages postés 14455 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour chers amis CCMistes,

Je sollicite votre aide pour la réalisation d'une macro sous LibreOffice 3.6.5.2 sur Windows 7 pro 64bits.

J'explique la situation : je joue à un jeu sur internet, qui consiste à développer et à capturer des châteaux, je ne vais pas rentrer dans les détails. Je suis en train de réaliser un tableau recensant les coordonnées géographiques de tous les châteaux des joueurs de mon alliance.

Mon classeur possède deux feuilles, une feuille contenant le tableau et une feuille qui me sert de moulinette car les coordonnées des châteaux ne sont pas accessibles dans le format désiré.

Voilà comment je procède pour remplir mon tableau :
1) je vais sur le profil du joueur
2) je fais un copier "brut" des coordonnées des châteaux du joueur
3) je les colle dans ma moulinette dans la case A2
4) je copie A2 dans B2
5) j'applique un AutoFiltre sur la colonne B pour supprimer les lignes vides
6) je récupère les données utiles dans les 4 dernières colonnes (E, F, G, H)
7) je les colle dans mon tableau à la suite des autres (colonne B)
8) je complète mon tableau avec diverses infos (nom du joueur, actif ou pas, date de dernière MAJ)

Je voudrais automatiser cela à partir de l'étape 4 jusqu'à l'étape 7 incluse.

Je n'ai encore jamais réalisé de macro, j'ai vraiment besoin de vous.

Merci d'avance pour votre aide.

Voilà mon fichier :
https://www.cjoint.com/?0FDdhOgEl9Q


A voir également:

2 réponses

barnabe0057 Messages postés 14455 Date d'inscription   Statut Contributeur Dernière intervention   4 925
 
J'avance un peu dans ma macro :

Sub auto_moulinette1 ()

Worksheets("moulinette").Activate
ActiveSheet.AutoFilterMode = False
Range("A2").Copy Destination:=Worksheets("moulinette").Range("B2")
ActiveSheet.Range("B2:B1000").AutoFilter

End Sub

Comment sélectionner les cellules des 4 dernières colonnes (E, F, G, H) en omettant la ligne 1 ?
0
barnabe0057 Messages postés 14455 Date d'inscription   Statut Contributeur Dernière intervention   4 925
 
Je patauge, je suis en train de me lobotomiser le cerveau !
0
barnabe0057 Messages postés 14455 Date d'inscription   Statut Contributeur Dernière intervention   4 925
 
Je vais essayer d'expliquer plus simplement :

je veux récupérer le contenu des 4 dernières colonnes mais sans les lignes vides, ensuite je les recopie dans mon tableau à la suite.
0