Satura rādītājs
Šajā rakstā es jums parādīšu, kā varat iegūt šūnas vērtību pēc rindas un kolonnas no darblapas programmā Excel. VBA . Jūs iemācīsieties iegūt šūnas vērtību no visas darblapas, kā arī no izmantotā darblapas diapazona un atlasītā diapazona.
Šūnas vērtības iegūšana pēc rindas un kolonnas programmā Excel VBA (ātrais skats)
SubCell_Value_from_Whole_Worksheet() Value = Worksheets("Sheet1").Cells(7, 3) MsgBox Value End Sub
Lejupielādēt Practice Workbook
Lejupielādējiet šo prakses darba burtnīcu, lai vingrinātos, kamēr lasāt šo rakstu.
Iegūt šūnu vērtību pēc rindas un kolonnas.xlsm3 metodes šūnu vērtības iegūšanai pēc rindas un kolonnas programmā Excel VBA
Tāpēc bez kavēšanās ķersimies pie mūsu šodienas galvenās diskusijas. Mēs iemācīsimies iegūt šūnas vērtību, izmantojot 3 metodes šodien: no visas darblapas, no izmantotā darblapas diapazona un no atlasītā diapazona.
1. Šūnu vērtības iegūšana pēc rindas un kolonnas no visas darblapas programmā Excel VBA
Vispirms no visas darblapas iegūsim šūnas vērtību pa rindām un kolonnām.
Lai no visas darblapas iegūtu šūnas vērtību pa rindām un kolonnām, varat izmantot Šūnu metode no VBA .
Piemēram, lai iegūtu vērtību no šūnas šūnā 4. rindu un 6. darblapas slejā ar nosaukumu Lapa1 , varat izmantot:
Vērtība = darblapas("Lapa1").Cells(4, 6)
⧭ Piemērs:
Šeit mums ir darblapa ar nosaukumu Lapa1 ar dažu studentu vārdi un to zīmes Fizika, ķīmija, un Matemātika skolas. Datu kopa sākas tieši no šūnas A1 darblapā.
Tagad, lai iegūtu zīmes no 6. students Ķīmija , šūnas vērtība ir jāiegūst no 7. rindu un 3. darblapas slejā.
Portāls VBA kods būs:
⧭ VBA kods:
SubCell_Value_from_Whole_Worksheet() Value = Worksheets("Sheet1").Cells(7, 3) MsgBox Value End Sub
⧭ Izvades:
Palaidiet kodu. Tas parādīs šūnas vērtību no 7. rindu un 3. slejā Lapa1 , kas ir 78 .
Lasīt vairāk: Kā atrast vērtību kolonnā, izmantojot VBA programmā Excel (4 veidi)
2. Šūnas vērtības iegūšana pēc rindas un kolonnas no izmantotā diapazona programmā Excel VBA
Tālāk mēs iegūsim šūnas vērtību pēc rindas un kolonnas no izmantotā darblapas diapazona.
Lai iegūtu šūnas vērtību pēc rindas un kolonnas no izmantotā darblapas diapazona, atkal varat izmantot Šūnu metode no VBA , bet gar UsedRange objekts.
Piemēram, lai iegūtu vērtību no šūnas šūnā 4. rindu un 6. darblapas izmantotā diapazona kolonnu ar nosaukumu lapa2 , varat izmantot:
Vērtība = darblapas("Sheet2").UsedRange.Cells(4, 6)
⧭ Piemērs:
Šeit mums ir vēl viena darblapa ar nosaukumu Lapa2 ar to pašu datu kopu dažu studentu vārdi un to zīmes Fizika, ķīmija, un Matemātika skolas. Bet šoreiz datu kopa sākas no šūnas B2 darblapā.
Tagad, lai iegūtu zīmes no 6. students Ķīmija atkal ir jāiegūst vērtība no 7. rindu un 3. izmantotā diapazona sleja.
Portāls VBA kods būs:
⧭ VBA kods:
SubCell_Value_from_Used_Ranget() Value = Worksheets("Sheet1").UsedRange.Cells(7, 3) MsgBox Value End Sub
⧭ Izvades:
Palaidiet kodu. Tas parādīs šūnas vērtību no 7. rindu un 3. izmantotā diapazona sleja 2 lapa , kas ir 78 .
Lasīt vairāk: Kā atrast vērtību kolonnā programmā Excel (4 metodes)
Līdzīgi lasījumi
- Kā Excel programmā Excel atrast vērtības pirmo atkārtojumu slejā (5 veidi)
- Kā atrast vērtības pēdējo atkārtošanos Excel kolonnā (5 metodes)
3. Šūnas vērtības iegūšana pēc rindas un kolonnas no noteikta diapazona programmā Excel VBA
Visbeidzot, mēs iegūsim šūnu vērtību pēc rindas un kolonnas no atlasītā darblapas diapazona.
Lai iegūtu šūnas vērtību pēc rindas un kolonnas no konkrēta darblapas diapazona, varat izmantot funkciju Šūnu metode no VBA , bet gar Diapazons objekts.
Piemēram, lai iegūtu vērtību no šūnas šūnā 4. rindu un 6. diapazona slejā E2:H14 darblapas ar nosaukumu Lapa3 , varat izmantot:
Vērtība = darblapas("Sheet3").Range("E2:H14").Cells(4, 6)
⧭ Piemērs:
Šeit mums ir vēl viena darblapa ar nosaukumu Lapa3 ar divām datu kopām. vārdi un Skolēnu ID ( B2:C14 ) skolas, un otru ar dažu studentu vārdi un to zīmes Fizika, ķīmija, un Matemātika (E2:H14) .
Tagad, lai iegūtu zīmes no 6. students Ķīmija atkal ir jāiegūst vērtība no 7. rindu un 3. diapazona slejā E2:H14 darblapā.
Portāls VBA kods būs:
⧭ VBA kods:
SubCell_Value_from_Selected_Range() Value = Worksheets("Sheet3").Range("E2:H14").Cells(7, 3) MsgBox Value End Sub
⧭ Izvades:
Palaidiet kodu. Tas parādīs šūnas vērtību no 7. rindu un 3. diapazona slejā E3:G13 no Lapa3 , kas ir 78 .
Lasīt vairāk: Kā Excel programmā Excel atrast 5 galvenās vērtības un nosaukumus (8 noderīgi veidi)
Lietas, kas jāatceras
Šeit esmu izmantojis UsedRange un Diapazona objekts no VBA Lai uzzinātu sīkāku informāciju par tiem, varat apmeklēt šo saiti.
Secinājums
Tātad, šeit ir veidi, kā iegūt jebkuras šūnas vērtību pēc rindas un kolonnas, izmantojot VBA Vai jums ir kādi jautājumi? Droši uzdodiet mums. Un neaizmirstiet apmeklēt mūsu vietni. ExcelWIKI vairāk ziņu un atjauninājumu.