Cod macro copiere si prelucrare date

Ce este nou in Microsoft Excel 2013?
Informatii despre cum se utilizeaza Microsoft Excel 2013
Calcule, Formule, Functii, Tabele pivot, Analiza datelor, etc
electros
Mesaje: 60
Membru din: Dum Iul 29, 2012 4:38 pm

Re: Cod macro copiere si prelucrare date

Mesaj de electros » Sâm Feb 06, 2021 2:32 pm

Salut, scuze ca nu am răspuns mai repede dar nu am avut timp sa ma ocup de acest proiect. Acum am testat codul propus și totul merge foarte bine. Mulțumesc mult pentru ajutor.

electros
Mesaje: 60
Membru din: Dum Iul 29, 2012 4:38 pm

Re: Cod macro copiere si prelucrare date

Mesaj de electros » Lun Feb 15, 2021 2:45 pm

Salut, după folosirea acestui cod timp de mai multe zile a mai aparat o problema. Unele din sheet- urile din fisierele care trebuie importate au pus un filtru în capul de tabel și nu apar decât 2, 3 rânduri completate. Se poate ca inainte sa copieze datele dintr-un sheet sa scoată toate filtrele de pe acel sheet ? Mulțumesc mult de ajutor.

Indigo-ONE
Mesaje: 437
Membru din: Mar Dec 11, 2018 8:54 pm

Re: Cod macro copiere si prelucrare date

Mesaj de Indigo-ONE » Lun Feb 15, 2021 11:37 pm

Salut,

foloseste AutoFilterMode = False inainte de copierea datelor.


"I fear the day that technology will surpass our human interaction. The world will have a generation of idiots."
Albert Einstein

electros
Mesaje: 60
Membru din: Dum Iul 29, 2012 4:38 pm

Re: Cod macro copiere si prelucrare date

Mesaj de electros » Mar Feb 16, 2021 7:39 am

Indigo-ONE scrie:
Lun Feb 15, 2021 11:37 pm
Salut,

foloseste AutoFilterMode = False inainte de copierea datelor.
Da stiu,am incercat sa folosesc asta sau "Sheet1.ShowAllData" dar nu reusesc sa pun aceste formule in codul de mai sus (care functioneaza bine) fara sa imi apara eroare.

Indigo-ONE
Mesaje: 437
Membru din: Mar Dec 11, 2018 8:54 pm

Re: Cod macro copiere si prelucrare date

Mesaj de Indigo-ONE » Mar Feb 16, 2021 7:46 pm

Daca citeai cu atentie vedeai ca am specificat...
foloseste AutoFilterMode = False inainte de copierea datelor
.


"I fear the day that technology will surpass our human interaction. The world will have a generation of idiots."
Albert Einstein

Scrie răspuns

Înapoi la “Intrebari despre Excel 2013”