aller a la ligne

[gounnet]

Bonjour

Je viens de me remettre sur excel alors que je n'y avais pas toucher depuis le lyçée (iesp si ca vous parle).

Grande redecouverte moi qui disais que tout cela me servirai a rien, je vais pouvoir faire toute ma compta ... enfin si j'arrive a m'en reservir...

Mon probleme...(enfin un de mes probleme):

J'aimerai qu'aprés avoir fini chaque travaux, je puisse les entrer avec toutes leurs carracteristiques dans excel et qu Excel me les range dans sur une feuille les uns à la suite des autres.

Voila je suis desolé si cette question a deja ete posée, je ne l'ai peut etre pas vu ou peut etre même pas compris.

Je vous remerci je pense qu'on se revera tres tres vite j'ai un tas de question a posées.

Ps: si je ne suis pas compris Je peux toujoours montrer les ebauche de mon travail.

au revoir.

 

[jeanpierre]

Re : aller a la ligne

Bonsoir gounnet et Bienvenue, re le forum,

Le reporting, tel que tu l'exposes, je n'utilise pas, donc je vais avoir du mal à te répondre.... (mes besoins sont résolus au cas par cas, genre bidouille)

Mais, néanmoins, un fichier joint pourra aider toutes celles ou ceux qui viendront pour t'aider.

Bonne soirée.

Jean-Pierre

 

[gounnet]

Re : aller a la ligne

Salut a toi Jean Pierre

est ce qu il est possible qu'un lieu de dire a une cellule d'aller chercher une information ce soit quelque chose qui lui envoie l'information.

par exemple pour un numeros de commande J'envoie le numero "x" dans la case D12 car la case D11 est deja utilisé avec une commande de type
( D & i ).

 

[Catrice]

Re : aller a la ligne

Bonsoir,

Ci-joint une interprétation de ce que tu demandes.
Il faudrait plus de précisions ...

 

[gounnet]

Re : aller a la ligne

c'est beau c'est bien c'est genial... mais comment ca marche...

au fait merci

 

[ccpapy]

Re : aller a la ligne

bonsoir, en faisant alt F11 tu accedes au code vba...
Sub Test()
[F65536].End(xlUp).Offset(1, 0) = [A5]
End Sub
en résumé on affecte la valeur de A5 à la cellule juste après la dernière écrite
voilà

 

[Catrice]

Re : aller a la ligne

Bonsoir,

La macro
Sub Test()
[F65536].End(xlUp).Offset(1, 0) = [A5]
End Sub

Les explications :
A chaque fois qu'on clique sur la bouton la macro Test (ci-dessus) s'execute.

Si on décompose
Elle va virtuellement se placer en F65536 (derniere cellule Excel de la colonne F) puis va remonter (comme si on faisait CTRL+Fleche vers le haut) jusqu'à la derniere cellule pleine de la colonne F (End(xlUp)).
Offset(1, 0) va se deplacer dans la cellule immediatement en dessous (1= une ligne, 0 = zero colonne. "une ligne en dessous dans la meme colonne")
Enfin, on affecte à cette cellule (où on est "arrivé"), le contenu de A5.
A chaque fois qu'on clique on est obligatoirement dans une cellule vide.

Académiquement on écrirait plutot :

Sub Test()
Range("F65536").End(xlUp).Offset(1, 0) = Range("A5")
End Sub

 

[gounnet]

Re : aller a la ligne

wouah j'essaie tout de suite...

 

[gounnet]

Re : aller a la ligne

aïe Je viens d'y pensé j'ai plusieurs feuilles et je vais repeter cette formule plusieurs fois dans mon classeur...la question est :

comment je fais pour precisser la feuille sur laquelle je veux appliquer la macro?

 

[Catrice]

Re : aller a la ligne

Re,

Sub Test()
Workbooks("toto.xls").Sheets("Feuille1").Range("F65536").End(xlUp).Offset(1, 0) = Workbooks("titi.xls").Sheets("Feuille4").Range("A5")
End Sub

 

[gounnet]

Re : aller a la ligne

Excusez-moi de vous derangez encore une fois mais ca ne marche pas avec moi. J'ai du me planter quelque part regardez:


Sub Test()
Workbooks("Classeur4.xls").Sheets("Feuil7").Range("B65536").End(xlUp).Offset(1, 0) = Workbooks("Classeur4.xls").Sheets("Feuil2").Range("C10")
End Sub

 

[gounnet]

Re : aller a la ligne

aaaah m'abandonné pas s'il vous plait

 

[gounnet]

Re : aller a la ligne

c'est bon j'ai compris,

sego/sarko ou milan/manchester ?

 

[gounnet]

Re : aller a la ligne

J attendrais

 

[gounnet]

Re : aller a la ligne

ok t'inquiete j'maitrise trop VBA