Turinys
QR kodai tai užšifruoti kvadratai, kuriuose gali būti turinys, nuorodos, informacija apie įvykius ir kita informacija, kurią naudotojai nori matyti. QR kodas Pagrindinis šio straipsnio tikslas - parodyti, kaip sukurti QR kodas "Excel" programoje.
Atsisiųsti praktikos sąsiuvinį
Šiame straipsnyje naudojamą pratybų sąsiuvinį galite atsisiųsti iš toliau pateiktos atsisiuntimo nuorodos.
QR kodo generavimas.xlsm2 paprasti būdai sukurti QR kodą programoje "Excel
Šiame straipsnyje paaiškinsiu du metodus, kuriais galite sukurti QR kodas Norėdamas paaiškinti šiuos metodus, paėmiau duomenų rinkinį, kuriame yra Vietovės pavadinimas ir jo URL, kuris yra Vertė mūsų QR kodas .
1. "Office" priedų naudojimas QR kodui kurti "Excel" programoje
Šiame metode paaiškinsiu, kaip sukurti QR kodas "Excel" programoje naudodami Biuro papildiniai .
Pažiūrėkime, kaip tai daroma žingsnis po žingsnio.
Žingsniai:
- Pirmiausia eikite į Įdėkite skirtukas.
- Po to pasirinkite Gaukite papildinių parinktį iš Papildiniai grupė.
A biblioteka ekrane bus rodomas.
- Dabar ieškokite QR4Office . Ir jūs gausite QR4Office .
- Tada spustelėkite Pridėti pridėti QR4office į savo Papildiniai .
Dabar bus rodomos licencijos sąlygos ir politika.
- Galiausiai pasirinkite Tęsti, ir QR4Office bus įdiegta.
- Dabar vėl eikite į Įdėkite skirtukas.
- Po to pasirinkite Mano papildiniai .
Tai padės jums patekti į Mano papildiniai biblioteka.
- Tada pasirinkite QR4Office .
- Galiausiai spustelėkite Pridėti .
Dabar pamatysite, kad QR4Office atidarytas "Excel" darbalapis. Galite įvesti tekstas arba URL kad norite koduoti Taip pat galite keisti spalvą, dydį ir foną. QR kodas iš čia.
- Dabar įveskite tekstas arba URL kad norite koduoti . Čia įvedžiau URL svetainėje ExcelWIKI .
- Galiausiai spustelėkite Įdėkite gauti savo QR kodas .
Dabar turiu QR kodas mano norimoje svetainėje.
Atlikdami tą patį procesą galite gauti visus kitus QR kodai norite.
2. Vartotojo apibrėžtos funkcijos kūrimas QR kodui kurti "Excel" programoje
Šiame 2-ajame metode paaiškinsiu, kaip sukurti QR kodai "Excel" programoje naudodami naudotojo apibrėžta funkcija . Šiuo tikslu naudosiu VBA .
Pažiūrėkime, kaip tai daroma žingsnis po žingsnio.
Žingsniai:
- Pirmiausia eikite į Kūrėjas skirtukas.
- Antra, pasirinkite "Visual Basic .
Dabar pamatysite "Visual Basic atidarytas langas.
- Po to eikite į Įdėkite skirtukas .
- Dabar pasirinkite Modulis galimybė.
Pamatysite Modulis atsidarė. Modulis įveskite šį kodą.
Funkcija QR_Generator(qrcodes_values As String) Dim Site_URL As String Dim Cell_Values As Range Set Cell_Values = Application.Caller Site_URL = "//chart.googleapis.com/chart?chs=100x100&&&cht=qr&chl=" & qrcodes_values On Error Resume Next ActiveSheet.Pictures("Generated_QR_CODES_" & Cell_Values.Address(False, False)).Delete On Error GoTo 0ActiveSheet.Pictures.Insert(Site_URL).Select With Selection.ShapeRange(1) .Name = "Generated_QR_CODES_" & Cell_Values.Address(False, False) .Left = Cell_Values.Left + 2 .Top = Cell_Values.Top + 2 End With QR_Generator = "" End Function
Kodo suskirstymas
- Čia sukūriau Funkcija pavadinimu QR_Generator . Kitas, naudotas qrcodes_values kaip Stygos funkcijos viduje.
- Tada paskelbė. Svetainės_URL kaip Stygos ir Cell_Values kaip Diapazonas .
- Toliau naudokite Application.Caller į Nustatyti savybė, kad būtų įjungta makro kur jis bus iškviestas.
- Po to, atsižvelgiant į URL adresas qr kodai .
- Aš taip pat naudojau Dėl klaidos tęsti toliau ignoruoti klaidą.
- Vėliau naudokite ActiveSheet.Pictures sukurti paveikslėlį aktyviajame lape.
- Toliau, naudodami Su pareiškimu pakeisti dydį qr kodai .
Dabar, Išsaugoti kodą kaip "Excel" makrokomandos įgalintas darbaknygis ir grįžkite į savo lapą.
- Dabar pasirinkite visas ląsteles, kuriose norite QR kodai . Čia pasirinkau ląsteles D5 , D6 , ir D7 .
- Po to užrašykite šią formulę.
=QR_Generator(C5)
Čia naudojau QR_Generator funkciją, kurią apibrėžiau VBA kodas. Ir qrcodes_values Pasirinkau ląstelę C5 Ši funkcija grąžins mums QR kodas už Vertė ląstelėje C5 .
- Galiausiai paspauskite CTRL+ENTER ir gausite QR kodai visoms ląstelėms.
Skaityti daugiau: "Excel VBA": atvirojo kodo QR kodų generatorius
Dalykai, kuriuos reikia prisiminti
- Dirbant su antruoju metodu reikėtų pažymėti, kad čia naudojau atvirojo kodo nuorodą. Taigi, kad ši funkcija veiktų tinkamai, turite turėti įjungtą interneto ryšį.
Praktikos skyrius
Čia pateikiau pratybų lapą, kad galėtumėte praktikuotis.
Išvada
Baigdamas norėčiau pasakyti, kad šiame straipsnyje pabandžiau paaiškinti, kaip sukurti QR kodai "Excel" programoje. Pateikiau 2 metodus. Tikiuosi, kad tai jums buvo naudinga. Norėdami gauti daugiau panašių straipsnių, apsilankykite ExcelWIKI . Jei turite klausimų, praneškite man žemiau esančiame komentarų skyriuje.