Thursday, May 21, 2020

Data Entry By Group wise Userform Excel VBA

Data Entry By Group wise Userform Excel VBA

Enter Data to database by matching ledger without filter will come data by group separate using in Useform textbox and Commandbutton and label

फ़िल्टर के बिना लेज़र के मेल से डेटाबेस में डेटा दर्ज करें, उपयोग टेक्स्टबॉक्स और कमांडबटन और लेबल में अलग से समूह द्वारा डेटा आएगा
أدخل البيانات إلى قاعدة البيانات عن طريق مطابقة دفتر الأستاذ بدون عامل تصفية البيانات حسب المجموعة منفصلة باستخدام مربع نص Useform و Commandbutton والتسمية

Data Entry By Group wise Userform Excel VBA



Thursday, May 14, 2020

How to Create inventory Manager Part1&Part2 Excel VBA

How to Create inventory Manager Part1 &Part2 Excel VBA

A Blog from razakmcr How to Create inventory Manager Excel VBA Create Inventory Manager Save, Save As ,Edit Update,Barcode Project, Print Multiple Count,Printer Page Setup All In One Video Thank you
This tutorial created In two Video

Razakmcr से एक वीडियो
इन्वेंट्री मैनेजर एक्सेल VBA कैसे बनाएं इन्वेंटरी मैनेजर बनाएं, इस रूप में सहेजें, एडिट अपडेट, बारकोड प्रोजेक्ट, प्रिंट मल्टीपल काउंट, प्रिंटर पेज सेटअप सभी एक वीडियो में धन्यवाद यह ट्यूटोरियल दो वीडियो में बनाया गया है



كيفية إنشاء مدير المخزون إكسل VBA

إنشاء مدير الجرد حفظ ، حفظ باسم ، تحرير التحديث ، مشروع الباركود ، طباعة عد متعدد ، إعداد صفحة الطابعة الكل في فيديو واحد شكرا لك

تم إنشاء هذا البرنامج التعليمي في فيديوين

How to Create inventory Manager Part1  Excel VBA

Video Part 1

Video Part2


Thursday, May 7, 2020

How to insert Currency Symbols In Userform Excel VBA

How to insert Currency Symbols In Userform Excel VBA



In this Blog I showing how to insert currency symbols
in Listbox using VBA code By Change combobox
U can choose different currency symbols from combobox dropdown menu


How to insert Currency Symbols In Userform Excel VBA

                                                                 Watch Video

Currency Symbols

Code for Symbols This Code Not Used In Tutorial Video)
Example
'Sheet1.range("A1")=ChrW$(&H20B9&)   '(Indian Currency)
Ucan get Currency Symbol Code
Excel Tab Menu   Insert   Symbols
See Photo
How to insert Currency Symbols In Userform Excel VBA


USA                                  $
Indian rupee                                  ₹
UAE                                  د.إ
Pound                                  £
Rupee                                  ₨
Euro Currency                                  €
Yen                                  ¥
French                                  ₣
Morocco                                  .د.م
Afghanistan                                  Af
Iraq                                  ع.د
Iran                                  ﷼
Oman                                  ر.ع.
Bangladesh                                  ৳
Bahrain                                  ب.د
North Korea                                  ₩
Qatar                                  ر.ق
Thailand                                  ฿
Saudi Arabia                                  ر.س

Tutorial VBA Code

For Userform Combobx Fill Data from Sheet2
Private Sub UserForm_Initialize()
'Combobox fill From Sheet2
Dim i As Long
For i = 2 To Sheet2.Range("A1000000").End(xlUp).Row
Me.ComboBox1.AddItem Sheet2.Cells(i, "A")
Me.ComboBox1.List(Me.ComboBox1.ListCount - 1, 1) = Sheet2.Cells(i, "B")
Next i
End Sub

For Listbox fill Data from Sheet2 with Currency Symnols
Private Sub CommandButton1_Click()
Dim A  As String
Dim i As Long
Me.ListBox1.Clear
If Me.ComboBox1 <> "" Then
A = Me.ComboBox1.List(Me.ComboBox1.ListIndex, 1)
For i = 2 To Sheet2.Range("D1000000").End(xlUp).Row
Me.ListBox1.AddItem Sheet2.Cells(i, "D")
Me.ListBox1.List(ListBox1.ListCount - 1, 1) = A & " " & Sheet2.Cells(i, "E")
Next i

Dim sum As Double
Dim x As Integer
Dim C, D As String
For x = 0 To Me.ListBox1.ListCount - 1
C = Len(Me.ListBox1.List(x, 1))
D = Len(A)
sum = sum + Val(Right(Me.ListBox1.List(x, 1), C - D))
Next x
 Me.ListBox1.AddItem
 Me.ListBox1.AddItem "Total"
 Me.ListBox1.List(ListBox1.ListCount - 1, 1) = A & " " & Format(sum, "#####.00")

 End If
End Sub