All Topics of VBA programming ЁЯСЗ
All subjects of BCA ЁЯСЗ

Editing Specific Cells

Buy all subjects pdf notes now [ examSpecial ]

Makhanlal Chaturvedi University / BCA / VBA programming

Editing Specific Cells using VBA in Hindi

How to edit cell content using VBA in Hindi

рдЕрдЧрд░ рдЖрдк Microsoft Excel рдореЗрдВ VBA (Visual Basic for Applications) рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░ рд░рд╣реЗ рд╣реИрдВ, рддреЛ рдХрд┐рд╕реА рднреА specific cell рдХреЛ рдЖрд╕рд╛рдиреА рд╕реЗ edit рдХрд░ рд╕рдХрддреЗ рд╣реИрдВред рдЗрд╕рдХрд╛ рдорддрд▓рдм рд╣реИ рдХрд┐ рдЖрдк manually Excel рдЦреЛрд▓рдХрд░ cell рдХреЛ change рдХрд░рдиреЗ рдХреА рдмрдЬрд╛рдп, рд╕реАрдзреЗ VBA рдХреЗ рдЬрд╝рд░рд┐рдП cell рдореЗрдВ text, number рдпрд╛ formula рдбрд╛рд▓ рд╕рдХрддреЗ рд╣реИрдВред

рд╕рдмрд╕реЗ рдкрд╣рд▓реЗ рд╕рдордЭрддреЗ рд╣реИрдВ рдХрд┐ Excel рдХреЗ рдХрд┐рд╕реА рднреА cell рдХреЛ VBA рд╕реЗ рдХреИрд╕реЗ access рдХрд┐рдпрд╛ рдЬрд╛рддрд╛ рд╣реИред

  • Range("A1").Value тАУ рдЗрд╕рдХрд╛ рдорддрд▓рдм рд╣реИ рдХрд┐ Excel рдХреА A1 cell рдХреЛ point рдХрд┐рдпрд╛ рдЬрд╛ рд░рд╣рд╛ рд╣реИред
  • рдЖрдк рдЗрд╕рдореЗрдВ рдирдпрд╛ data рдбрд╛рд▓ рд╕рдХрддреЗ рд╣реИрдВ: Range("A1").Value = "рдирдпрд╛ рдЯреЗрдХреНрд╕реНрдЯ"
  • рдпрд╣ code A1 cell рдореЗрдВ тАЬрдирдпрд╛ рдЯреЗрдХреНрд╕реНрдЯтАЭ рд▓рд┐рдЦ рджреЗрдЧрд╛ред

рдЕрдЧрд░ рдЖрдк multiple cells рдХреЛ edit рдХрд░рдирд╛ рдЪрд╛рд╣рддреЗ рд╣реИрдВ:

Range("A1:B2").Value = "Hello"

рдпрд╣ рдХреЛрдб A1 рд╕реЗ B2 рддрдХ рдХреА рд╕рднреА cells рдореЗрдВ тАЬHelloтАЭ рднрд░ рджреЗрдЧрд╛ред

Updating values and formulas in specific cells with VBA in Hindi

рдЕрдм рд╕рдордЭрддреЗ рд╣реИрдВ рдХрд┐ рдХреИрд╕реЗ рдЖрдк рдХрд┐рд╕реА specific cell рдореЗрдВ value рдпрд╛ formula рдбрд╛рд▓ рд╕рдХрддреЗ рд╣реИрдВред

  • Value рдбрд╛рд▓рдиреЗ рдХреЗ рд▓рд┐рдП: Range("C3").Value = 250
  • Formula рдбрд╛рд▓рдиреЗ рдХреЗ рд▓рд┐рдП: Range("D4").Formula = "=SUM(A1:A5)"
  • рдЗрд╕ code рд╕реЗ D4 cell рдореЗрдВ formula set рд╣реЛ рдЬрд╛рдПрдЧрд╛ рдЬреЛ A1 рд╕реЗ A5 рдХрд╛ рдпреЛрдЧ рдХрд░реЗрдЧрд╛ред
  • Formula рдбрд╛рд▓рддреЗ рд╕рдордп рд╣рдореЗрд╢рд╛ рдпрд╛рдж рд░рдЦреЗрдВ рдХрд┐ formula string рдХреЗ рд░реВрдк рдореЗрдВ рджреЗрдирд╛ рд╣реЛрддрд╛ рд╣реИ, рдФрд░ рдЙрд╕рдореЗрдВ "=" рдЬрд░реВрд░ рд╢рд╛рдорд┐рд▓ рд╣реЛред

Example: Cell рдореЗрдВ рджрд┐рдирд╛рдВрдХ (Date) рдбрд╛рд▓рдирд╛

Range("E5").Value = Date

рдпрд╣ code E5 cell рдореЗрдВ рдЖрдЬ рдХреА рддрд╛рд░реАрдЦ рдбрд╛рд▓ рджреЗрдЧрд╛ред

Using VBA to clear or format specific cells in Hindi

VBA рд╕реЗ рдЖрдк рдирд╛ рд╕рд┐рд░реНрдл content рдмрджрд▓ рд╕рдХрддреЗ рд╣реИрдВ рдмрд▓реНрдХрд┐ рдХрд┐рд╕реА рднреА cell рдХреЛ clear (рдЦрд╛рд▓реА) рдпрд╛ format рднреА рдХрд░ рд╕рдХрддреЗ рд╣реИрдВред рдиреАрдЪреЗ рдХреБрдЫ basic operations рджрд┐рдП рдЧрдП рд╣реИрдВ:

  • Cell рдЦрд╛рд▓реА рдХрд░рдирд╛: Range("A1").ClearContents тАУ рдпрд╣ рдХреЗрд╡рд▓ content рд╣рдЯрд╛рдПрдЧрд╛, formatting рдирд╣реАрдВред
  • Complete Clear (Formatting рд╕рд╣рд┐рдд): Range("A1").Clear
  • Formatting Clear рдХрд░рдирд╛: Range("A1").ClearFormats
  • Cell рдХрд╛ рд░рдВрдЧ рдмрджрд▓рдирд╛: Range("A1").Interior.Color = RGB(255, 255, 0) тАУ рдЗрд╕рд╕реЗ cell рдкреАрд▓рд╛ рд╣реЛ рдЬрд╛рдПрдЧрд╛ред
  • Font Bold рдХрд░рдирд╛: Range("A1").Font.Bold = True
  • Font Size рдмрджрд▓рдирд╛: Range("A1").Font.Size = 14

Example: рдиреАрдЪреЗ рдПрдХ full formatting code:

With Range("B2") .Value = "Hello World" .Font.Bold = True .Font.Color = RGB(0, 0, 255) .Interior.Color = RGB(200, 200, 200) End With

Common errors while editing cells and how to fix them in Hindi

рдЬрдм рд╣рдо VBA рд╕реЗ cells рдХреЛ edit рдХрд░рддреЗ рд╣реИрдВ, рддреЛ рдХреБрдЫ рд╕рд╛рдорд╛рдиреНрдп рдЧрд▓рддрд┐рдпрд╛рдБ (Errors) рд╕рд╛рдордиреЗ рдЖрддреА рд╣реИрдВред рдЪрд▓рд┐рдП рдЙрдиреНрд╣реЗрдВ рд╕рдордЭрддреЗ рд╣реИрдВ рдФрд░ рдЙрдирдХреЗ рд╕рдорд╛рдзрд╛рди рдЬрд╛рдирддреЗ рд╣реИрдВ:

Common Error Reason Solution
Run-time error '1004' Invalid cell reference рдпрд╛ protected worksheet Check рдХрд░реЗрдВ рдХрд┐ cell address рд╕рд╣реА рд╣реИ рдФрд░ sheet protected рдирд╣реАрдВ рд╣реИ
Application-defined or object-defined error Invalid Range рдпрд╛ рдЧрд▓рдд syntax Range("A1") рдХреА рдЬрдЧрд╣ рдЧрд▓рдд format рдирд╛ рджреЗрдВ, рдЬреИрд╕реЗ Range("1A")
Type mismatch Wrong data type assign рдХрд░рдирд╛ рдЬреИрд╕реЗ text рдХреЛ numeric cell рдореЗрдВ рдбрд╛рд▓рдиреЗ рдХреА рдХреЛрд╢рд┐рд╢
Object required Set statement рдЧрд▓рдд рддрд░реАрдХреЗ рд╕реЗ use рдХрд░рдирд╛ Object assign рдХрд░рдиреЗ рд╕реЗ рдкрд╣рд▓реЗ рдЙрд╕реЗ define рдХрд░реЗрдВ

Tips to avoid errors:

  • рд╣рдореЗрд╢рд╛ cell address рдХреЛ double quotes рдореЗрдВ рд▓рд┐рдЦреЗрдВ
  • Protected worksheets рдкрд░ change рдХрд░рдиреЗ рд╕реЗ рдкрд╣рд▓реЗ protection remove рдХрд░реЗрдВ
  • рдЕрдЧрд░ рдЖрдк formula рдбрд╛рд▓ рд░рд╣реЗ рд╣реИрдВ, рддреЛ syntax рд╕рд╣реА рд░рдЦреЗрдВ рдФрд░ тАЬ=тАЭ рд╕реЗ рд╢реБрд░реВ рдХрд░реЗрдВ
  • Error рдЖрдиреЗ рдкрд░ Debug option рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░реЗрдВ

Extra Beginner-Friendly Tips for VBA Cell Editing

  • VBA editor рдЦреЛрд▓рдиреЗ рдХреЗ рд▓рд┐рдП Excel рдореЗрдВ ALT + F11 рджрдмрд╛рдПрдБ
  • Insert тЖТ Module рдкрд░ рдХреНрд▓рд┐рдХ рдХрд░реЗрдВ рдФрд░ рдЕрдкрдирд╛ VBA code рд╡рд╣рд╛рдБ рд▓рд┐рдЦреЗрдВ
  • Code рдХреЛ run рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП F5 рджрдмрд╛рдПрдБ рдпрд╛ "Run" рдмрдЯрди рдкрд░ рдХреНрд▓рд┐рдХ рдХрд░реЗрдВ
  • рдЕрдЧрд░ рдЖрдк рдмрд╛рд░-рдмрд╛рд░ code рдЪрд▓рд╛рдирд╛ рдЪрд╛рд╣рддреЗ рд╣реИрдВ, рддреЛ рдЙрд╕реЗ рдПрдХ button рд╕реЗ рдЬреЛрдбрд╝ рд╕рдХрддреЗ рд╣реИрдВ
  • Worksheet рдХрд╛ рдирд╛рдо рд╕рд╣реА рд╣реЛрдирд╛ рдЪрд╛рд╣рд┐рдП, рдЬреИрд╕реЗ: Sheets("Sheet1").Range("A1").Value = "Hi"

Advanced: Using Variables with Cell Editing

рдЖрдк VBA рдореЗрдВ variables рдмрдирд╛рдХрд░ рдЙрдиреНрд╣реЗрдВ cell values рдХреЗ рд╕рд╛рде use рдХрд░ рд╕рдХрддреЗ рд╣реИрдВ:

Dim studentName As String studentName = "рд░рд╛рд╣реБрд▓ рд╢рд░реНрдорд╛" Range("B2").Value = studentName

рдЖрдк loop рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░рдХреЗ рдХрдИ cells рдореЗрдВ values рднрд░ рд╕рдХрддреЗ рд╣реИрдВ:

Dim i As Integer For i = 1 To 5 Range("A" & i).Value = "Student " & i Next i

рдпрд╣ рдХреЛрдб A1 рд╕реЗ A5 рддрдХ "Student 1", "Student 2", рдЖрджрд┐ рднрд░ рджреЗрдЧрд╛ред

Cell Editing рдХреЗ рд▓рд┐рдП рд╕рдмрд╕реЗ рдЙрдкрдпреЛрдЧреА VBA Commands (Quick Reference)

Function Code
Value рд╕реЗрдЯ рдХрд░рдирд╛ Range("A1").Value = "Text"
Formula рд▓рдЧрд╛рдирд╛ Range("B1").Formula = "=SUM(A1:A5)"
Cell Clear рдХрд░рдирд╛ Range("C1").ClearContents
Formatting Clear рдХрд░рдирд╛ Range("D1").ClearFormats
Font Bold рдХрд░рдирд╛ Range("E1").Font.Bold = True
Cell Color рджреЗрдирд╛ Range("F1").Interior.Color = RGB(255, 255, 0)

рдЗрд╕ рдкреНрд░рдХрд╛рд░, VBA рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░рдХреЗ Excel рдореЗрдВ рдХрд┐рд╕реА рднреА cell рдХреЛ рдЖрд╕рд╛рдиреА рд╕реЗ manage, edit, format, clear рдФрд░ update рдХрд┐рдпрд╛ рдЬрд╛ рд╕рдХрддрд╛ рд╣реИред рдКрдкрд░ рджрд┐рдП рдЧрдП рд╕рднреА examples рдХреЛ рдЖрдк copy-paste рдХрд░рдХреЗ рдЕрдкрдиреЗ Excel VBA рдореЗрдВ рдЪрд▓рд╛ рд╕рдХрддреЗ рд╣реИрдВ рдФрд░ practice рдХрд░рдХреЗ рдЗрд╕реЗ рдФрд░ рдмреЗрд╣рддрд░ рддрд░реАрдХреЗ рд╕реЗ рд╕рдордЭ рд╕рдХрддреЗ рд╣реИрдВред

FAQs

VBA рдореЗрдВ рдЖрдк Range("A1").Value = "рдирдпрд╛ рдбреЗрдЯрд╛" рдЬреИрд╕реЗ рд╕рд┐рдВрдЯреИрдХреНрд╕ рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░рдХреЗ рдХрд┐рд╕реА рднреА cell рдХреА value рдХреЛ рдмрджрд▓ рд╕рдХрддреЗ рд╣реИрдВред рдпрд╣ рддрд░реАрдХрд╛ simple рдФрд░ рд╕рдмрд╕реЗ рдЬреНрдпрд╛рджрд╛ рдЙрдкрдпреЛрдЧ рдХрд┐рдпрд╛ рдЬрд╛рддрд╛ рд╣реИред
рдпрджрд┐ рдЖрдк рдХрд┐рд╕реА cell рдореЗрдВ formula рд▓рдЧрд╛рдирд╛ рдЪрд╛рд╣рддреЗ рд╣реИрдВ, рддреЛ рдЖрдк Range("B1").Formula = "=SUM(A1:A5)" рдЬреИрд╕реЗ рдХреЛрдб рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░ рд╕рдХрддреЗ рд╣реИрдВред рдзреНрдпрд╛рди рджреЗрдВ рдХрд┐ formula рд╣рдореЗрд╢рд╛ string рдХреЗ рд░реВрдк рдореЗрдВ рдФрд░ "=" рд╕реЗ рд╢реБрд░реВ рд╣реЛрдирд╛ рдЪрд╛рд╣рд┐рдПред
рдХрд┐рд╕реА cell рдХреЛ рдЦрд╛рд▓реА рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП Range("C1").ClearContents рдХрдорд╛рдВрдб рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░реЗрдВред рдпрд╣ рдХреЗрд╡рд▓ content рд╣рдЯрд╛рдПрдЧрд╛, formatting рдХреЛ рдирд╣реАрдВ рдЫреЗрдбрд╝реЗрдЧрд╛ред
Formatting рдХреЗ рд▓рд┐рдП рдЖрдк properties рдЬреИрд╕реЗ .Font.Bold, .Interior.Color рдЖрджрд┐ рдХрд╛ use рдХрд░ рд╕рдХрддреЗ рд╣реИрдВред рдЙрджрд╛рд╣рд░рдг рдХреЗ рд▓рд┐рдП: Range("D1").Font.Bold = True cell рдХреЛ bold рдХрд░ рджреЗрдЧрд╛ред
рд╕рдмрд╕реЗ рд╕рд╛рдорд╛рдиреНрдп error рд╣реИ "Run-time error '1004'" рдЬреЛ рддрдм рдЖрддреА рд╣реИ рдЬрдм cell address рдЧрд▓рдд рд╣реЛ рдпрд╛ worksheet protected рд╣реЛред рдЗрд╕рдХрд╛ рд╕рдорд╛рдзрд╛рди рд╣реИ: рд╕рд╣реА cell reference рджреЗрдирд╛ рдФрд░ sheet рдХреА protection рд╣рдЯрд╛рдирд╛ред
рдЖрдк loop рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░рдХреЗ рдХрдИ cells рдореЗрдВ data рднрд░ рд╕рдХрддреЗ рд╣реИрдВред рдЙрджрд╛рд╣рд░рдг рдХреЗ рд▓рд┐рдП: Dim i As Integer
For i = 1 To 5
  Range("A" & i).Value = "Student " & i
Next i
рдпрд╣ code A1 рд╕реЗ A5 рддрдХ "Student 1", "Student 2"... рднрд░ рджреЗрдЧрд╛ред

FAQs

рдХрд┐рд╕реА рд╡рд┐рд╢реЗрд╖ рд╕реЗрд▓ рдХрд╛ рдорд╛рди рдмрджрд▓рдиреЗ рдХреЗ рд▓рд┐рдП рдЖрдк Range("A1").Value = "New Value" рдЬреИрд╕реЗ рдХреЛрдб рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░ рд╕рдХрддреЗ рд╣реИрдВред рдЗрд╕рд╕реЗ A1 рд╕реЗрд▓ рдореЗрдВ "New Value" рд╕реЗрдЯ рд╣реЛ рдЬрд╛рдПрдЧрд╛ред
рдЖрдк Excel рд╕реЗрд▓ рдореЗрдВ formula рдЕрдкрдбреЗрдЯ рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП Range("B1").Formula = "=SUM(A1:A5)" рдЬреИрд╕реЗ рдХреЛрдб рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░ рд╕рдХрддреЗ рд╣реИрдВред рдЗрд╕рд╕реЗ B1 рд╕реЗрд▓ рдореЗрдВ SUM рдХрд╛ рдлреЙрд░реНрдореВрд▓рд╛ рд╕реЗрдЯ рд╣реЛ рдЬрд╛рдПрдЧрд╛ред
рдХрд┐рд╕реА рднреА рд╕реЗрд▓ рдХрд╛ content рд╣рдЯрд╛рдиреЗ рдХреЗ рд▓рд┐рдП Range("C1").ClearContents рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░реЗрдВред рдпрд╣ рдХреЛрдб рд╕рд┐рд░реНрдл рдбрд╛рдЯрд╛ рд╣рдЯрд╛рддрд╛ рд╣реИ, formatting рдирд╣реАрдВред
Formatting рдмрджрд▓рдиреЗ рдХреЗ рд▓рд┐рдП Range("D1").Font.Bold = True рдпрд╛ Range("D1").Interior.Color = RGB(255, 255, 0) рдЬреИрд╕реЗ рдХреЛрдб рдЗрд╕реНрддреЗрдорд╛рд▓ рдХрд┐рдП рдЬрд╛рддреЗ рд╣реИрдВред
рдпрд╣ error рддрдм рдЖрддрд╛ рд╣реИ рдЬрдм cell reference рдЧрд▓рдд рд╣реЛ рдпрд╛ worksheet protected рд╣реЛред рд╕рд╣реА cell reference рдФрд░ unprotected worksheet рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░рдХреЗ рдЗрд╕реЗ рдареАрдХ рдХрд┐рдпрд╛ рдЬрд╛ рд╕рдХрддрд╛ рд╣реИред
рдЖрдк variable рдХрд╛ рдкреНрд░рдпреЛрдЧ рдХрд░рдХреЗ dynamic рдорд╛рди рдбрд╛рд▓ рд╕рдХрддреЗ рд╣реИрдВ:
Dim name As String
name = "Rahul"
Range("A1").Value = name

рдЗрд╕рд╕реЗ "Rahul" рдХреЛ A1 рд╕реЗрд▓ рдореЗрдВ рд╕реЗрдЯ рдХрд┐рдпрд╛ рдЬрд╛ рд╕рдХрддрд╛ рд╣реИред

Please Give Us Feedback