Kā pārvietoties Word 2007 tabulā
Uzziniet, kā efektīvi pārvietoties Word 2007 tabulā, izmantojot īsinājumtaustiņus un peles darbības, lai optimizētu savu darba plūsmu.
Kā lietot If-Then programmā Excel 2016 VBA
Ja-Tad ir VBA vissvarīgākā kontroles struktūra. Jūs, iespējams, izmantosit šo komandu katru dienu. Izmantojiet struktūru Ja-Tad, ja vēlaties izpildīt vienu vai vairākus priekšrakstus ar nosacījumu. Neobligātā Else klauzula, ja tā ir iekļauta, ļauj izpildīt vienu vai vairākus priekšrakstus, ja pārbaudāmais nosacījums nav patiess. Šeit ir vienkārša CheckUser procedūra, kas pārkodēta, lai izmantotu If-Then-Else struktūru:
Sub CheckUser2()
Lietotājvārds = InputBox ("Ievadiet savu vārdu: ")
Ja Lietotājvārds = “Satya Nadella”, tad
MsgBox (“Laipni lūdzam Satja…”)
' …[Vairāk kodu šeit] …
Citādi
MsgBox “Atvainojiet. To var vadīt tikai Satja Nadella.
Beigas Ja
Beigu apakš
Ja-Tad piemēri
Šī rutīna parāda If-Then struktūru bez izvēles Else klauzulas:
Sub GreetMe() Ja laiks < 0,5, tad MsgBox “Labrīt” Beigu apakš
GreetMe procedūra izmanto VBA laika funkciju, lai iegūtu sistēmas laiku. Ja pašreizējais laiks ir mazāks par 0,5, rutīna parāda draudzīgu sveicienu. Ja laiks ir lielāks vai vienāds ar 0,5, rutīna beidzas un nekas nenotiek.
Lai parādītu citu sveicienu, ja laiks ir lielāks vai vienāds ar 0,5, varat pievienot vēl vienu If-Then priekšrakstu aiz pirmā:
Sub GreetMe2() Ja laiks < 0,5, tad MsgBox “Labrīt” Ja laiks >= 0,5, tad MsgBox “Labdien” Beigu apakš
Ievērojiet, ka >= (lielāks par vai vienāds ar) tiek izmantots otrajam If-Then priekšrakstam. Tas nodrošina, ka tiek aptverta visa diena. Ja būtu izmantots > (lielāks nekā), ziņojums netiktu parādīts, ja šī procedūra tiktu izpildīta precīzi pulksten 12:00. Tas ir diezgan maz ticams, taču, izmantojot tādu svarīgu programmu kā šī, jūs nevēlaties riskēt.
Ja-tad-cits piemērs
Cita pieeja iepriekšējai problēmai izmanto Else klauzulu. Šeit ir tā pati rutīna, kas pārkodēta, lai izmantotu If-Then-Else struktūru:
Sub GreetMe3()
Ja laiks < 0,5, tad MsgBox "Labrīt" Citādi _
MsgBox "Labdien"
Beigu apakš
Ņemiet vērā, ka iepriekšējā piemērā tiek izmantota rindas turpinājuma rakstzīme (pasvītra). Ja-tad-cits paziņojums patiesībā ir viens paziņojums. VBA nodrošina nedaudz atšķirīgu veidu, kā kodēt If-Then-Else konstrukcijas, kurās tiek izmantots priekšraksts End If. Tāpēc GreetMe procedūru var pārrakstīt kā
Sub GreetMe4()
Ja Laiks < 0,5 Tad
MsgBox "Labrīt"
Citādi
MsgBox "Labdien"
Beigas Ja
Beigu apakš
Faktiski sadaļā If varat ievietot neierobežotu skaitu priekšrakstu, bet daļā Else - neierobežotu skaitu paziņojumu. Šī sintakse ir vieglāk lasāma un padara paziņojumus īsākus.
Ko darīt, ja jums ir jāpaplašina GreetMe rutīna, lai tiktu galā ar trim nosacījumiem: no rīta, pēcpusdienā un vakarā? Jums ir divas iespējas: izmantojiet trīs If-Then priekšrakstus vai izmantojiet ligzdotu If-Then-Else struktūru. Ligzdošana nozīmē struktūras If-Then-Celse ievietošanu citā If-Then-Citt struktūrā. Pirmā pieeja, izmantojot trīs If-Then paziņojumus, ir vienkāršāka:
Sub GreetMe5() Dim Msg As String Ja laiks < 0,5, tad ziņa = "Rīts" Ja laiks >= 0,5 un laiks < 0,75, tad ziņa = “pēcpusdiena” Ja laiks >= 0,75, tad ziņa = "vakars" MsgBox “Labs” & Ziņojums Beigu apakš
Jauns pavērsiens tika pievienots, izmantojot mainīgo. Mainīgais Msg iegūst atšķirīgu teksta vērtību atkarībā no diennakts laika. MsgBox paziņojumā tiek parādīts sveiciens: Labrīt, Labvakar vai Labvakar.
Tālāk norādītā rutīna veic to pašu darbību, bet izmanto If-Then-End If struktūru:
Sub GreetMe6()
Dim Msg As String
Ja Laiks < 0,5 Tad
Ziņa = "Rīts"
Beigas Ja
Ja laiks >= 0,5 un laiks < 0,75, tad
Ziņa = "Pēcpusdiena"
Beigas Ja
Ja Laiks >= 0,75 Tad
Ziņa = "Vakars"
Beigas Ja
MsgBox “Labs” & Ziņojums
Beigu apakš
Izmantojot ElseIf
Iepriekšējos piemēros katrs rutīnas paziņojums tiek izpildīts. Nedaudz efektīvāka struktūra izietu no rutīnas, tiklīdz tiek konstatēts, ka nosacījums ir patiess. Piemēram, no rīta procedūrai jāparāda ziņojums Labrīt un pēc tam jāiziet, neizvērtējot citus liekos apstākļus.
Izmantojot šādu sīku rutīnu, jums nav jāuztraucas par izpildes ātrumu. Bet lielākām lietojumprogrammām, kurās ātrums ir kritisks, jums jāzina cita struktūras If-Then sintakse.
Lūk, kā jūs varat pārrakstīt GreetMe rutīnu, izmantojot šo sintaksi:
Sub GreetMe7() Dim Msg As String Ja Laiks < 0,5 Tad Ziņa = "Rīts" ElseIf Laiks >= 0,5 Un laiks < 0,75 Tad Ziņa = "Pēcpusdiena" Citādi Ziņa = "Vakars" Beigas Ja MsgBox “Labs” & Ziņojums Beigu apakš
Ja nosacījums ir patiess, VBA izpilda nosacījumu paziņojumus un If struktūra beidzas. Citiem vārdiem sakot, šī procedūra ir nedaudz efektīvāka nekā iepriekšējie piemēri. Kompromiss ir tāds, ka kodu ir grūtāk saprast.
Vēl viens Ja-Tad piemērs
Šeit ir vēl viens piemērs, kurā izmantota struktūras If-Ten vienkāršā forma. Šī procedūra pieprasa lietotājam norādīt daudzumu un pēc tam parāda atbilstošo atlaidi, pamatojoties uz lietotāja ievadīto daudzumu:
Sub ShowDiscount() Dim Daudzums Tik ilgi Dim atlaide kā dubultā Daudzums = ievades lodziņš (“Ievadiet daudzumu:”) Ja daudzums > 0, tad atlaide = 0,1 Ja daudzums >= 25, tad atlaide = 0,15 Ja Daudzums >= 50, tad Atlaide = 0.2 Ja daudzums >= 75, tad atlaide = 0,25 MsgBox “Atlaide: “ & Atlaide Beigu apakš
Ņemiet vērā, ka katrs šīs rutīnas priekšraksts If-Ten tiek izpildīts un Atlaides vērtība var mainīties, izpildot paziņojumus. Tomēr rutīna galu galā parāda pareizo Atlaides vērtību, jo paziņojumi Ja-Tad ir Atlaides vērtību augošā secībā.
Šī procedūra veic tos pašus uzdevumus, izmantojot alternatīvo ElseIf sintaksi. Šajā gadījumā rutīna beidzas uzreiz pēc patiesa nosacījuma paziņojumu izpildes:
Sub ShowDiscount2()
Dim Daudzums Tik ilgi
Dim atlaide kā dubultā
Daudzums = InputBox ("Ievadiet daudzumu: ")
Ja daudzums > 0 un daudzums < 25, tad
Atlaide = 0,1
ElseIf Daudzums >= 25 Un daudzums < 50 Tad
Atlaide = 0,15
ElseIf Daudzums >= 50 Un daudzums < 75 Tad
Atlaide = 0,2
ElseIf Daudzums >= 75 Tad
Atlaide = 0,25
Beigas Ja
MsgBox “Atlaide: “ & Atlaide
Beigu apakš
Šīs vairākas Ja-Tad struktūras ir diezgan apgrūtinošas. Ja-tad struktūru, iespējams, vēlēsities izmantot tikai vienkāršiem bināriem lēmumiem.
10 Excel funkcijas, kas jums patiešām būtu jāzina
Šajā sarakstā ir iekļautas desmit populārākās Excel funkcijas, kas attiecas uz plašu vajadzību klāstu. Uzziniet, kā izmantot <strong>Excel funkcijas</strong> efektīvāk!
Papildu analīzes slāņu pievienošana jūsu Excel diagrammām
Uzziniet, kā pievienot papildu analīzes slāņus jūsu Excel diagrammām, lai uzlabotu vizualizāciju un sniegtu precīzākus datus. Šis raksts apraksta visas nepieciešamās darbības.
Kā izveidot rindkopas atkāpi programmā Word 2013
Uzziniet, kā iestatīt <strong>rindkopas atkāpi</strong> programmā Word 2013, lai uzlabotu dokumenta noformējumu un lasāmību.
Kā ievietot slejas Word 2010 dokumentā
Uzziniet, kā pareizi ievietot slejas programmā Word 2010, lai uzlabotu jūsu dokumentu formātu un struktūru.
Šūnu datu aizsardzība programmā Excel 2007
Apsveriet iespēju aizsargāt Excel 2007 darblapu, lai izvairītos no neplānotām izmaiņām. Uzziniet, kā aizsargāt un atbloķēt šūnas, lai nodrošinātu datu integritāti.
PMT funkcija programmā Excel 2013
Programmas Excel 2013 PMT funkcija aprēķina periodisko mūža rentes maksājumu. Šī funkcija ir būtiska hipotekāro kredītu maksājumu plānošanai.
Kā lietot t-test datu analīzes rīku programmā Excel
Mācieties, kā veikt t-testus Excel programmā, izmantojot datus un aprakstot trīs t-testu veidus, kas noderēs jūsu datu analīzes procesā.
Kā filtrēt datu sarakstu programmā Excel 2016
Uzziniet, kā filtrēt datu sarakstu programmā Excel 2016, lai ērti paslēptu nevēlamus ierakstus un strādātu tikai ar nepieciešamajiem datiem.
Kā pievienot datu etiķetes diagrammai programmā Excel 2007
Uzziniet, kā vienkārši pievienot datu etiķetes diagrammai programmā Excel 2007. Palīdziet noteikt vērtības, kas tiek rādītas katrā datu punktā, izmantojot dažādas izvietošanas un formatēšanas iespējas.