cod vba pentru modificare text din coloana C in functie de coloana B

popa.catalin
Mesaje: 13
Membru din: Vin Oct 19, 2018 1:27 am

cod vba pentru modificare text din coloana C in functie de coloana B

Mesaj de popa.catalin » Vin Oct 19, 2018 2:28 am

Va rog sa ma ajutati la urmatoarea problema.
As vrea un cod vba pentru a modifica coloana C in functie de coloana B (de exemplu la salariatul cu numele "pop" din coloana B in coloana C sa se modifica din "F1" in "F3" pe toate randurile.
Va multumesc anticipat.
New Microsoft Excel Worksheet1.xlsx
Nu aveţi permisiunea de a vizualiza fişierele ataşate acestui mesaj.

Indigo-99
Mesaje: 60
Membru din: Dum Sep 02, 2018 8:21 am

Re: cod vba pentru modificare text din coloana C in functie de coloana B

Mesaj de Indigo-99 » Vin Oct 19, 2018 12:37 pm

De ce cod VBA? O formula simpla ar rezolva cerinta...
"I don’t pretend we have all the answers. But the questions are certainly worth thinking about."
Sir Arthur C. Clarke

popa.catalin
Mesaje: 13
Membru din: Vin Oct 19, 2018 1:27 am

Re: cod vba pentru modificare text din coloana C in functie de coloana B

Mesaj de popa.catalin » Vin Oct 19, 2018 1:08 pm

Vreau cod vba pentru ca sunt aproximativ 500 de salariati, sunt inregistrari zilnice si la un moment dat tabelul poate cuprinde 10000 de inregistrari.
La un moment dat sefu muta un salariat de la o ferma la alta, iar eu ar trebui sa caut salariatul si sa modific la toate inregistrarile ferma.

Indigo-99
Mesaje: 60
Membru din: Dum Sep 02, 2018 8:21 am

Re: cod vba pentru modificare text din coloana C in functie de coloana B

Mesaj de Indigo-99 » Vin Oct 19, 2018 1:53 pm

Cod: Selectaţi tot

Sub InlocuireF1()
For Each k In Range("A2:A" & Range("A" & Rows.Count).End(xlUp).Row)
If k = "popa" Then k.Offset(, 1) = "F3"
Next
End Sub
"I don’t pretend we have all the answers. But the questions are certainly worth thinking about."
Sir Arthur C. Clarke

popa.catalin
Mesaje: 13
Membru din: Vin Oct 19, 2018 1:27 am

Re: cod vba pentru modificare text din coloana C in functie de coloana B

Mesaj de popa.catalin » Vin Oct 19, 2018 2:07 pm

Va multumesc foarte mult.
Merge perfect. Poate viata ne va intalni si dau o sticla de Cotnari.
O zi buna.

Indigo-99
Mesaje: 60
Membru din: Dum Sep 02, 2018 8:21 am

Re: cod vba pentru modificare text din coloana C in functie de coloana B

Mesaj de Indigo-99 » Vin Oct 19, 2018 2:19 pm

Ca sa nu inlocuiesti in cod numele si ferma, atunci:

Cod: Selectaţi tot

Sub InlocuireF1_2()
x = InputBox("Ce nume cautam?")
y = InputBox("La ce ferma va lucra?")
For Each k In Range("A2:A" & Range("A" & Rows.Count).End(xlUp).Row)
If k = x Then k.Offset(, 1) = y
Next
End Sub
"I don’t pretend we have all the answers. But the questions are certainly worth thinking about."
Sir Arthur C. Clarke

popa.catalin
Mesaje: 13
Membru din: Vin Oct 19, 2018 1:27 am

Re: cod vba pentru modificare text din coloana C in functie de coloana B

Mesaj de popa.catalin » Vin Oct 19, 2018 3:30 pm

Super MULTUMESC inca odata.
In textBoxurile in care scriu numele salariatului si ferma nu sar putea sa fie comboBoxuri fara duplicate
de unde sa aleg salariatul si ferma fara sa le mai scriu.
Cred ca cer prea mult.
Orcum multumesc si pentru atat.

Indigo-99
Mesaje: 60
Membru din: Dum Sep 02, 2018 8:21 am

Re: cod vba pentru modificare text din coloana C in functie de coloana B

Mesaj de Indigo-99 » Vin Oct 19, 2018 9:33 pm

Ca sa fie asa cum vrei trebuie creat un UserForm cu 2 ComboBox-uri si eventual un buton de comanda.
S-ar putea si altfel:

In aceasi foaie sau in alta, creezi doua celule cu Data Validation, iar pentru fiecare lista din DV, creezi liste cu date unice din coloanele de interes, eventual sortate si eventual dinamice.
Ca sa poti schimba datele in foaia de interes vom crea un Worksheet_Change event. Gata.
"I don’t pretend we have all the answers. But the questions are certainly worth thinking about."
Sir Arthur C. Clarke

popa.catalin
Mesaje: 13
Membru din: Vin Oct 19, 2018 1:27 am

Re: cod vba pentru modificare text din coloana C in functie de coloana B

Mesaj de popa.catalin » Sâm Oct 20, 2018 7:56 am

Multumesc pt. informatii.
Am facut exact cum mi-ai spus. A iesit superrrrr.
Iti doresc o zi buna si tot respectul din partea mea.

Scrie răspuns

Înapoi la “Visual Basic for Application (VBA) cu Excel - Intrebari tehnice”