Im stuck with some code in VBA. Every time i manually change the value in textBox20 it resets when i hit the SaveQuote button. The subroutine ComboBox20_Change is being triggered programatically elsewhere in the project that is doing it and i cant figure out how to stop it.
Private Sub ComboBox20_Change() If Not isUserChange Then Exit Sub ' Only proceed if the user triggered the change
Dim ws As Worksheet Dim lookupValue As String Dim result As String Dim qValue As String Dim installValue As Double Dim Rng As Range Dim cell As Range Dim found As Boolean
Me.TextBox2000.Value = 1 Me.TextBox3000.Value = 1
Set ws = ThisWorkbook.Sheets("GHMatrix") lookupValue = Trim(Me.ComboBox20.Value)
If lookupValue = "" Then Me.TextBox200.Value = "" Me.TextBox20.Value = "" Me.TextBox300.Value = "" Me.ComboBox30.Value = "" Me.TextBox30.Value = "" Exit Sub End If
found = False For Each cell In ws.Range("H1:H" & ws.Cells(Rows.Count, "H").End(xlUp).row) If Trim(cell.Value) = lookupValue Then Set Rng = cell found = True Exit For End If Next cell
If found Then result = ws.Cells(Rng.row, 1).Value qValue = ws.Cells(Rng.row, 21).Value installValue = ws.Cells(Rng.row, 22).Value
Me.TextBox200.Value = result Me.TextBox20.Value = qValue
High-End V-Ray Interior Renders Category: 3D Animation, 3D Design, 3D Modelling, 3D Rendering, 3D Visualization, SketchUp, V Ray Budget: ₹600 - ₹1500 INR
Personal Face Swap Video Editing Category: After Effects, Animation, DaVinci Resolve, Motion Graphics, Video Editing, Video Post Editing, Video Processing, Video Production Budget: ₹600 - ₹1500 INR
Install Karaoke System at Bar Category: A / V Systems, Audio Engineering, Audio Services, Installation Budget: £250 - £750 GBP
28-Nov-2025 10:47 GMT
Senior Engineer for Cross-Platform System Features Category: Android, DNS, IPhone, Linux, Mobile App Development, Network Engineering, Software Development, System Administration, Technical Documentation, VPN Budget: €1500 - €3000 EUR
28-Nov-2025 10:47 GMT
Epic AI Historical Video Editor Category: 3D Animation, 3D Design, 3D Modelling, 3D Rendering, After Effects, Animation, Blender, Video Editing Budget: ₹600 - ₹1500 INR
