Рет қаралды 1,628
ក្នុងវីដេអូនេះបង្ហាញពីរបៀបបង្កើតQR Codes in Excel,How to Create a QR Code,FreeStudy
#excel #Khexcel
សូមចុច subscribe និងសញ្ញារូបកណ្ដឹង ដើម្បីទទួលបានចំណេះដឹង និងគន្លឹះល្អៗ។
• • បំលែងប្រាក់រៀលទៅដុល្លា...
• • របៀបកាត់តួអក្សរជាមួយ រ...
• • របៀបប្រើរូបមន្ត Count ...
• • រូបមន្ត RANK នៅក្នុង E...
• របៀបបំលែងចំនួនទឹកប្រាក...
• របៀបប្រើរូបមន្ត IF កំណ...
• បញ្ចូលពិន្ទុសិស្សតាមទូ...
• របៀបបង្កើត Appsheetដើម...
• គណនាអាយុក្នុង Excel|Ho...
• រូបមន្តExcel,(គន្លឹះបង...
• បញ្ចីញែកឈ្មោះសិស្ស និង...
• គន្លឹះក្នុងការធ្វើប៊ូត...
• ការធ្វើបញ្ជីបូកសរុបអវត...
• របៀបធ្វើបញ្ជីស្រង់អវត្...
• មិនសូវចំណាយច្រើនពេលដឹង...
សូមអរគុណចំពោះការទស្សនារបស់អ្នកទាំងអស់គ្នា !!
-----------------------------------------------------
Code សម្រាប់បង្កើត QR Code : Code for creating QR Codes.
Sub QRCode()
Dim URL As String
Dim QRCode As Object
Dim Location As Range
Range("b4").Select
On Error Resume Next
ActiveSheet.Shapes.Delete
Do Until ActiveCell.Value() = ""
URL = "quickchart.io/qr?text=" & ActiveCell.Value
Set Location = ActiveCell.Offset(0, 1)
Set QRCode = Sheets("create QR Codes").Pictures.Insert(URL)
With QRCode
.Name = "QRCodeVBA"
.Top = Location.Top
.Left = Location.Left
.Height = Location.Height
.Width = Location.Height
End With
ActiveCell.Offset(1, 0).Select
Loop
End Sub