Macro: Sélection et mise à jour d'une ligne

  • Initiateur de la discussion Initiateur de la discussion samuel
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S

samuel

Guest
Bonsoir à tous,

J'ai besoin de votre aide pour résoudre un problème un peu complexe:

J'utilise excel pour faire sondages, que j'historise sur une feuille.
Parfois j'ai pas le temps de finir de saisir toutes les info alors je gère un status en cours/terminé et grace à une macro je peux rappeler les fiches sondages en cours. Chaque fiche à une numéro de réf.

Mon problème est le suivant: actuellement quand je resauvegarde une fiche je suis obligé de recréer une ligne: j'ai donc des doublons.

Je voudrais pouvoir dire à la macro:
1- trouve dans la base de données la ligne correspondant au sondage que je suis en train de mettre à jour
2- et met à jour cette ligne

exemple:
Dim Index As Integer
Index = 8

While Sheets("BDETUDE").Cells(Index, 1) <> ""
'(pour la reference du sondage)
If Sheets("BDETUDE").Cells(Index, 1).Value = Sheets("fichesondage").Cells(11, 5).Value Then
'pour mettre à jour une des colonnes de la ligne sélectionnée
Sheets("fichesondage").Select
Range("J12").Select
Cont = Selection.Value
Sheets("BDETUDE").Select
Range("PIndex").Select
Selection.Value = Cont
End If
Index = Index + 1
Wend

Merci à tous
Bonne soirée

Samuel
 
salut à toi et au forumeux,

je ne te propose pas de pas de solution,

je crois avoir perçu la teneur de ton souci,
mais le code que tu montres n'est pas explicite
sans un spécimen de fichier où le mettre en ouevre.

visiblement, je ne suis pas le seul à être rebuté.

Joins-un bout de fichier à ta demande,
les questions sans réponse sont rares.

vale
jyM
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
8
Affichages
485
Réponses
10
Affichages
554
Réponses
4
Affichages
209
Réponses
7
Affichages
172
Réponses
4
Affichages
253
Retour