Modifier des cellules sélectionnées avec rechercheV

R

Raja

XLDnaute Accro

• 19 Mai 2009

• #2

Re : Modifier des cellules sélectionnées avec rechercheV

Bonjour et bienvenu,

Merci de nous joindre un échantillon de ton fichier et explique-nous dans ce fichier ce que tu veux obtenir comme résultat final.

 

Vote positif 0 Vote négatif

S

Samus22

XLDnaute Nouveau

• 19 Mai 2009

• #3

Re : Modifier des cellules sélectionnées avec rechercheV

Voilà, c'est que les cellules orange selectionnent une ligne du tableau BDD avec la fonction rechercheV ce que je voudrais faire c'est modifier cette ligne sélectionnée du tableau BDD avec les cellules à coté de celles orange.

 

Pièces jointes

• Classification DM.xls

  47 KB · Affichages: 80

Vote positif 0 Vote négatif

S

Samus22

XLDnaute Nouveau

• 19 Mai 2009

• #4

Re : Modifier des cellules sélectionnées avec rechercheV

J'ai essayé de bidouiller avec des copies de cellules vers d'autres pour ecraser les données mais c'est pas concluant.

Quelqu'un aurait-il une idée ?

Merci

 

Vote positif 0 Vote négatif

S

Samus22

XLDnaute Nouveau

• 20 Mai 2009

• #5

Re : Modifier des cellules sélectionnées avec rechercheV

J'ai encore essayé de m'inspirer par rapport au post de titine06

https://www.excel-downloads.com/threads/macro-recherche-ecrit.120560/

Vu que mes connaissances sont limitées j'ai un peu de mal à m'en servir si une âme charitable pouvais m'éclairer ça serait super sympa

Merci pour votre aide

PS: merci Minick et titine06

 

Dernière édition: 20 Mai 2009

Vote positif 0 Vote négatif

S

Samus22

XLDnaute Nouveau

• 20 Mai 2009

• #6

Re : Modifier des cellules sélectionnées avec rechercheV

arf, personne pour m'aider ?

 

Vote positif 0 Vote négatif

A

alexga78

XLDnaute Occasionnel

• 20 Mai 2009

• #7

Re : Modifier des cellules sélectionnées avec rechercheV

bonjour Samus22, le forum,
un essai pour ton fichier en PJ.
bonne journée à tous

 

Pièces jointes

• Classification.zip

  16.3 KB · Affichages: 96

Vote positif 0 Vote négatif

S

Samus22

XLDnaute Nouveau

• 20 Mai 2009

• #8

Re : Modifier des cellules sélectionnées avec rechercheV

Yeah ! C'est exactement ça ! Un gros gros merci alexga78

Mais peux-tu m'expliquer comment as-tu fait ?

Encore merci !

Edit : impossible de l'insérer dans ma base données 'erreur de type 91'

 

Dernière édition: 20 Mai 2009

Vote positif 0 Vote négatif

S

Samus22

XLDnaute Nouveau

• 20 Mai 2009

• #9

Re : Modifier des cellules sélectionnées avec rechercheV

Ca m'a l'air bizarre car ça ne fonctionne que sur une partie de la base de données (j'ai importé la mienne car sinon cela dépassait la taille limite des fichiers sur le fofo).

 

Vote positif 0 Vote négatif

A

alexga78

XLDnaute Occasionnel

• 21 Mai 2009

• #10

Re : Modifier des cellules sélectionnées avec rechercheV

Bonjour Samus22, le forum,

Es-tu sûr d'avoir copier également le nom de la liste ?
Sinon mets sur le forum le fichier final pour que quelqu'un puisse y jeter un petit coup d'oeil...
sinon pour les explications c'est relativement simple :

Code:

Option Explicit
Dim x$
Dim i%
Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
' Ici on recupere le numero de la ligne des données à modifier
x = Sheets("BDD").Range("A3:A" & ActiveSheet.UsedRange.Rows.Count).Find(What:=Sheets("Modification DM").Range("A3"), SearchOrder:=xlByColumns).Row
' boucle sur les valeurs de la ligne
For i = 2 To 12
' test pour modifier uniquement les valeurs modifiées
If Sheets("Modification DM").Cells(i + 3, 3).Value = "" Then
Sheets("BDD").Cells(x, i) = Sheets("Modification DM").Cells(i + 3, 2).Value
Else
Sheets("BDD").Cells(x, i) = Sheets("Modification DM").Cells(i + 3, 3).Value
End If
Next
MsgBox "Remplacement éffectué"
Sheets("Modification DM").Cells(5, 3).Resize(11, 1).ClearContents
Application.ScreenUpdating = True
End Sub

à te lire

 

Vote positif 0 Vote négatif