TGViewer
Channel Public Channel
UstozMahmud

UstozMahmud

@ustozmahmudd

Kompyuterni tushunish qiyin emas, agar yoningizda yo‘l ko‘rsatuvchi bo‘lsa.
Ustoz Mahmud siz bilan — birga o‘rganamiz, birga o‘samiz.
Hayotdagi har bir muvaffaqiyat — birinchi qadamdan boshlanadi. 🚀
👉YOUTUBE: https://www.youtube.com/@UstozMahmud
Subscribers
1.81K
Photos
3
Videos
170
Links
168

Showing posts older than #164 · Back to latest

Older Posts 20 shown
Post #163 1.85K
🥬Excelda 100 kunda 100 ta formula chellenj. Bugun sizlar bilan fayllar bir biriga bog'lashni o'rganib olamiz.
72 -kun ✔️

🎓 UstozMahmud - o'rganing va yuksaling.🔝

🖤 Youtube | 📱 Instagram | 📱 Telegram
  • ❤ 11
  • 👍 4
Post #162 2.09K
🥬Excelda 100 kunda 100 ta formula chellenj. Bugun sizlar bilan ma'lumotlarni osonlik bilan birlashtirishni o'rganib olamiz.
71 -kun ✔️

🎓 UstozMahmud - o'rganing va yuksaling.🔝

🖤 Youtube | 📱 Instagram | 📱 Telegram
  • ❤ 5
  • 👍 3
  • 🔥 3
Post #161 2.07K
🥬Excelda 100 kunda 100 ta formula chellenj. Bugun sizlar bilan haftadagi ish kunlarini qanday qilib osonlik bilan hisoblashni o'rganib olamiz.
70 -kun ✔️

🎓 UstozMahmud - o'rganing va yuksaling.🔝

🖤 Youtube | 📱 Instagram | 📱 Telegram
  • ❤ 5
  • 👏 4
  • ⚡ 2
Post #160 2K
69-kun videosida ishlatilgan kodlar

Function NumberToWordUZ(ByVal Num As Double) As String

Dim integerPart As Double
Dim decimalPart As Integer
Dim result As String

' Manfiy sonlar
If Num < 0 Then
NumberToWordUZ = "minus " & NumberToWordUZ(Abs(Num))
Exit Function
End If

integerPart = Int(Num)
decimalPart = Round((Num - integerPart) * 100, 0)

result = NumberGroupToWord(integerPart) & " so‘m"

If decimalPart > 0 Then
result = result & " " & NumberGroupToWord(decimalPart) & " tiyin"
End If

NumberToWordUZ = Application.WorksheetFunction.Trim(result)

End Function


Private Function NumberGroupToWord(ByVal Num As Double) As String

Dim ones As Variant
ones = Array("", "bir", "ikki", "uch", "to‘rt", "besh", "olti", "yetti", "sakkiz", "to‘qqiz")

Dim tens As Variant
tens = Array("", "o‘n", "yigirma", "o‘ttiz", "qirq", "ellik", "oltmish", "yetmish", "sakson", "to‘qson")

Dim thousands As Variant
thousands = Array("", "ming", "million", "milliard", "trillion")

If Num = 0 Then
NumberGroupToWord = "nol"
Exit Function
End If

Dim result As String
Dim i As Integer
i = 0

Do While Num > 0
Dim part As Integer
part = Num Mod 1000

If part <> 0 Then
result = ConvertHundredsUZ(part) & " " & thousands(i) & " " & result
End If

Num = Int(Num / 1000)
i = i + 1
Loop

NumberGroupToWord = Application.WorksheetFunction.Trim(result)

End Function


Private Function ConvertHundredsUZ(ByVal Num As Integer) As String

Dim ones As Variant
ones = Array("", "bir", "ikki", "uch", "to‘rt", "besh", "olti", "yetti", "sakkiz", "to‘qqiz")

Dim tens As Variant
tens = Array("", "o‘n", "yigirma", "o‘ttiz", "qirq", "ellik", "oltmish", "yetmish", "sakson", "to‘qson")

Dim result As String

If Num >= 100 Then
result = ones(Int(Num / 100)) & " yuz "
Num = Num Mod 100
End If

If Num >= 10 Then
result = result & tens(Int(Num / 10)) & " "
Num = Num Mod 10
End If

If Num > 0 Then
result = result & ones(Num)
End If

ConvertHundredsUZ = result

End Function
  • ❤ 6
  • 🔥 4
  • ⚡ 2
Post #159 1.64K
🥬Excelda 100 kunda 100 ta formula chellenj. Bugun sizlar bilan sonlarni qanday qilib matn holatiga aylantirib olishni o'rganib olamiz. Videoda ko'rsatilga kodlarni keyingi postdan yuklab olishingiz mumkin.
69 -kun ✔️

🎓 UstozMahmud - o'rganing va yuksaling.🔝

🖤 Youtube | 📱 Instagram | 📱 Telegram
  • ❤ 4
  • 🔥 3
  • 👍 1
  • 🆒 1
Post #158 1.62K
🥬Excelda 100 kunda 100 ta formula chellenj. Bugun sizlar bilan turli xildagi matnlarni katta xarfga aylantiish formulasini o'rganib olamiz.
68 -kun ✔️

🎓 UstozMahmud - o'rganing va yuksaling.🔝

🖤 Youtube | 📱 Instagram | 📱 Telegram
  • ❤ 5
  • 🔥 3
  • 👍 1
Post #157 1.53K
🥬Excelda 100 kunda 100 ta formula chellenj. Bugun sizlar bilan listlarni parollashni o'rganib olamiz.
67 -kun ✔️

🎓 UstozMahmud - o'rganing va yuksaling.🔝

🖤 Youtube | 📱 Instagram | 📱 Telegram
  • ❤ 4
  • 🔥 4
Post #156 1.57K
🥬Excelda 100 kunda 100 ta formula chellenj. Bugun sizlar bilan ko'paytirish uchun kerakli formulasini o'rganib olamiz.
66 -kun ✔️

🎓 UstozMahmud - o'rganing va yuksaling.🔝

🖤 Youtube | 📱 Instagram | 📱 Telegram
  • ❤ 4
  • 🔥 2
  • 👍 1
Post #155 1.64K
🥬Excelda 100 kunda 100 ta formula chellenj. Bugun sizlar bilan =СУММЕСЛИ() formulasini o'rganib olamiz.
65 -kun ✔️

🎓 UstozMahmud - o'rganing va yuksaling.🔝

🖤 Youtube | 📱 Instagram | 📱 Telegram
  • ❤ 5
  • 👍 3
  • ❤‍🔥 1
Post #154 1.73K
🥬Excelda 100 kunda 100 ta formula chellenj. Bugun sizlar bilan qanday qilib foizlarni hisoblashni o'rganib olamiz.
64 -kun ✔️

🎓 UstozMahmud - o'rganing va yuksaling.🔝

🖤 Youtube | 📱 Instagram | 📱 Telegram
  • ❤ 6
  • 👍 4
Post #153 1.68K
🥬Excelda 100 kunda 100 ta formula chellenj. Bugun sizlar bilan =СУММПРОИЗВ() formulasini o'rganib olamiz. Bu bizga sonlarni ko'paytirib qo'shishga yordam beradi.
63 -kun ✔️

🎓 UstozMahmud - o'rganing va yuksaling.🔝

🖤 Youtube | 📱 Instagram | 📱 Telegram
  • 👏 5
  • ❤ 4
  • 👍 1
Post #152 1.58K
🥬Excelda 100 kunda 100 ta formula chellenj. Bugun sizlar bilan 1 listdagi malumotlar orqali boshqa listdagi jadvalni hisoblashni o'rganib olamiz.
62 -kun ✔️

🎓 UstozMahmud - o'rganing va yuksaling.🔝

🖤 Youtube | 📱 Instagram | 📱 Telegram
  • 👍 7
  • ❤ 3
Post #151 1.68K
61-kun uchun yozilgan darsdagi kodlar
Private Sub Worksheet_Change(ByVal Target As Range)

Dim cell As Range

' Faqat B ustun kuzatiladi
If Not Intersect(Target, Range("B:B")) Is Nothing Then

Application.EnableEvents = False

For Each cell In Intersect(Target, Range("B:B"))

' Agar B katak bo‘sh emas va A hali bo‘sh bo‘lsa
If cell.Value <> "" And cell.Offset(0, -1).Value = "" Then
cell.Offset(0, -1).Value = Date
End If

Next cell

Application.EnableEvents = True

End If

End Sub

#excelcode #61-kun
  • ❤ 6
  • 👍 3
Post #150 1.61K
🥬Excelda 100 kunda 100 ta formula chellenj. Bugun sizlar bilan makros larni ishlatishni o'rganib olamiz.
61 -kun ✔️

🎓 UstozMahmud - o'rganing va yuksaling.🔝

🖤 Youtube | 📱 Instagram | 📱 Telegram
  • 👏 5
  • ❤ 2
Post #149 1.54K
🥬Excelda 100 kunda 100 ta formula chellenj. Bugun sizlar bilan ish 2ta formulani birgalikda qanday qilib ishlatishni o'rganib olamiz.
60 -kun ✔️

🎓 UstozMahmud - o'rganing va yuksaling.🔝

🖤 Youtube | 📱 Instagram | 📱 Telegram
  • ❤ 6
  • 👍 3
Post #148 1.49K
🥬Excelda 100 kunda 100 ta formula chellenj. Bugun sizlar bilan ish jarayonini visual ko'rsatish uchun qulay formulani o'rganib olamiz.
59 -kun ✔️

🎓 UstozMahmud - o'rganing va yuksaling.🔝

🖤 Youtube | 📱 Instagram | 📱 Telegram
  • ❤ 8
Post #147 1.64K
🤫 Bu darsda ko'pchilik o'quvchilarim bilmaydigan usulni o'rganib olamiz. Ya'ni Word dasturida siz o'zbek tilida yozilgan matnlarni osonlik bilan o'zingiz istagan boshqa tildagi matnlarga tarjima qilib olishingiz mumkin bo'ladi. 👍

#word #lifehacks

🎓 UstozMahmud - o'rganing va yuksaling.🔝

🖤 Youtube | 📱 Instagram | 📱 Telegram
  • ❤ 10
  • 👍 6
Post #146 1.54K
🥬Excelda 100 kunda 100 ta formula chellenj. Bugun sizlar bilan 3ta formulani qanday qilib baravariga ishlatishni o'rganib olamiz.
58 -kun ✔️

🎓 UstozMahmud - o'rganing va yuksaling.🔝

🖤 Youtube | 📱 Instagram | 📱 Telegram
  • ❤ 8
  • 👍 3
Post #145 1.6K
🥬Excelda 100 kunda 100 ta formula chellenj. Bugun sizlar bilan СЧЁТЕСЛИ() formulasini o'rganib olamiz bu bizga malumotlarni sanashga yordam beradi.
57 -kun ✔️

🎓 UstozMahmud - o'rganing va yuksaling.🔝

🖤 Youtube | 📱 Instagram | 📱 Telegram
  • ❤ 6
  • 👍 4
Post #144 1.55K
🥬Excelda 100 kunda 100 ta formula chellenj. Bugun sizlar bilan kataklardagi malumotlarni osonlik bilan qo'shib beruvchi formulani o'rganib olamiz.
56 -kun ✔️

🎓 UstozMahmud - o'rganing va yuksaling.🔝

🖤 Youtube | 📱 Instagram | 📱 Telegram
  • 👍 7
  • ❤ 3
  • 🔥 2
Older posts →
Threads Profile ViewerView any public Threads profile without an account.Open ThreadLook →Writing with AI? Make it sound human.Metric37 rewrites AI drafts so they read naturally. Free AI detector, 1,500 words free.Try Metric37 →