copie des données avec case à cocher

[vincent50]

Bonjour, j'aurai aimé savoir si il est possible de copier une ligne de données dans les "abandons", effacer le contenu de la ligne sur laquelle se trouve la case à cocheret masquer cette ligne par la même occasion car si cette ligne est supprimée, cela me plante d'autres feuilles derriere.
Merci de votre aide

 

[Dan]

Re : copie des données avec case à cocher

Bonjour,

Je te propose une macro sans utiliser les cases à cocher car tu vas devoir recopier toutes ces cases à chaque ligne. Quel travail il me semble. 🙁

Clique simplement sur le nom pour qu'il soit recopié plus bas.

Place cette macro en VBA dans la feuille concernée (ici "engagés")

 Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim lign As Byte
'Macro par DAN pour Vincent le 14/09/07
lign = Range("A12", Range("A65536").End(xlUp)).Row + 1
If Not Application.Intersect(Target, Range("A2:A10")) Is Nothing Then
With Target
    .Copy Destination:=ActiveSheet.Cells(lign, 1)
    .EntireRow.Hidden = True
End With
End If
End Sub

On peut aussi imaginer remplacer les cases à cocher par un X qui se placerait sur clique dans la cellule en colonne B et ce, en regard du nom.

A te lire

Dan

 

[vincent50]

Re : copie des données avec case à cocher

merci, le probléme est que si je veux annuler un nom dans les abandons pour le remettre a sa place de depart, je ne peux pas. C'est pour ca que j'avais pensé a la case à cocher.

 

[Dan]

Re : copie des données avec case à cocher

Re,

Tu n'avais pas expliqué celaa au départ.

Ok mais si tu caches ta ligne en question, ta case à cocher sera aussi cachée. Alors là tu fais comment ? Ou j'ai mal compris ton pb ?

A te lire

Dan

 

[vincent50]

Re : copie des données avec case à cocher

je recapitule ce que j'ai besoin, quand on coche la case face a une ligne, cette ligne est copiée dans les abandons et les cellules sont vidées sans que la ligne soit supprimée et la case se décoche automatiquement.
Merci de votre aide

 

[Dan]

Re : copie des données avec case à cocher

Re,

Pas facile là car si je comprends bien, tu veux en cochant une case à cocher :

- recopier la ligne (donc le nom et la case à cocher) dans la liste des abandons
- décocher la case à cocher
- puis cacher la ligne et la case à cocher

Là je ne vois pas comment on va faire pour cacher des objets car ils ne sont pas liés à la ligne.
De plus, chaque case à cocher porte une référence et devra devra correpondre une macro spécifique.

Il faut que je vois les possibilités de te donner une solution.

Dan