Aggiornare da vba una cella di un foglio attraverso la ricerca stile cerca.vert

Question

Ciao a tutti ho questo problema:

ho creato una macro che ha all'interno queste istruzioni molto semplici

Range("J2").Select

       Selection.Copy

       Sheets("Sede").Select

       Range("D4").Select

       Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

        :=False, Transpose:=False

Praticamente prendo quello che c'è in J2 che sta nel foglio DISTINTA lo copio e lo incollo nel foglio SEDE alla cella D4 (il dato corrisponde alla giacenza).

Siccome nel foglio Sede è probabile che avvengano delle modifiche è chiaro che una volta aggiunte delle righe la cella D4 non sia quella da aggiornare. Siccome credo, ma qui chiedo lumi, non esista in vba la possibilità di inserire il $ tale per cui vincolare una cella pensavo di, facendo riferimento al codice prodotto presente nel foglio distinta in A2, cercare il codice prodotto corrispondente sul foglio SEDE e aggiornare la cella che corrisponde alla GIACENZA di A2 nel foglio SEDE con il contenuto di J2 del foglio DISTINTA.

Spero di essere stato chiaro. Qualche indicazione? Grazie

Answer 1

Ciao a tutti ho questo problema:

ho creato una macro che ha all'interno queste istruzioni molto semplici

Range("J2").Select

       Selection.Copy

       Sheets("Sede").Select

       Range("D4").Select

       Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

        :=False, Transpose:=False

Praticamente prendo quello che c'è in J2 che sta nel foglio DISTINTA lo copio e lo incollo nel foglio SEDE alla cella D4 (il dato corrisponde alla giacenza).

Siccome nel foglio Sede è probabile che avvengano delle modifiche è chiaro che una volta aggiunte delle righe la cella D4 non sia quella da aggiornare. Siccome credo, ma qui chiedo lumi, non esista in vba la possibilità di inserire il $ tale per cui vincolare una cella pensavo di, facendo riferimento al codice prodotto presente nel foglio distinta in A2, cercare il codice prodotto corrispondente sul foglio SEDE e aggiornare la cella che corrisponde alla GIACENZA di A2 nel foglio SEDE con il contenuto di J2 del foglio DISTINTA.

Spero di essere stato chiaro. Qualche indicazione? Grazie

Ciao Claudio,

una possibilità è quella di attribuire un Nome, diciamo GIACENZA, alla cella D4 del Foglio SEDE (premi Ctrl+F3).

Da vba  potrai poi farvi riferimento 'chiamandola' per nome, senza preoccuparti della sua posizione fisica nel foglio o nella cartella, nel seguente modo:

Sheets("Distinta").Range("J2").Copy

Range("GIACENZA ").PasteSpecial xlPasteValues

se l'ambito del nome è Cartella di Lavoro, oppure così:

Sheets("Distinta").Range("J2").Copy

Sheets("Distinta").Range("GIACENZA ").PasteSpecial xlPasteValues

se, invece, l'ambito è il Foglio2.

Andrea.

Answer 2

Andrea, perfetto! Mi hai dato davvero una gran bella dritta. Grazie!!!

Di niente.

Andrea.

Answer 3

Andrea, perfetto! Mi hai dato davvero una gran bella dritta. Grazie!!!