Excel VBA
 

Hello,

I have created a Dialog Box which has a link to a
spreadsheet. Whatever changes I make in the spreadsheet,
it should update the dialog box, but its not doing that.

Below is the code:

Private Sub cmdOK_Click()
On Error Resume Next

Worksheets("Main").Range("I6").Value = txtMaxDmc.Value
Worksheets("Main").Range("J6").Value =
txtMaxDmcFirm.Value
Worksheets("Main").Range("K6").Value =
txtMaxDmcNonFirm.Value
Worksheets("Main").Range("I8").Value =
txtPeakPeriodCharge.Value
Worksheets("Main").Range("I9").Value =
txtOffPeakPeriodCharges.Value
Worksheets("Main").Range("I11").Value =
txtWeldingSetFee.Value


Do I have place this coding in a different function?

Please help!

Thanks,
Sheela

Excel VBA
 

Sheela

The destination should be on the left of the equation.
Therefore the form should take it's values from the sheet.
If this happens try changing

Worksheets("Main").Range("I6").Value = txtMaxDmc.Value

to

txtMaxDmc.Value = Worksheets("Main").Range("I6").Value

Peter
-----Original Message-----
Hello,

I have created a Dialog Box which has a link to a
spreadsheet. Whatever changes I make in the spreadsheet,
it should update the dialog box, but its not doing that.

Below is the code:

Private Sub cmdOK_Click()
On Error Resume Next

Worksheets("Main").Range("I6").Value = txtMaxDmc.Value
Worksheets("Main").Range("J6").Value =
txtMaxDmcFirm.Value
Worksheets("Main").Range("K6").Value =
txtMaxDmcNonFirm.Value
Worksheets("Main").Range("I8").Value =
txtPeakPeriodCharge.Value
Worksheets("Main").Range("I9").Value =
txtOffPeakPeriodCharges.Value
Worksheets("Main").Range("I11").Value =
txtWeldingSetFee.Value


Do I have place this coding in a different function?

Please help!

Thanks,
Sheela
.

Excel VBA
 

Hi Peter,

I had tried, it worked!! Thanks. This coding is placed
within the CmdOK_Click function. It will only change when
I click on the OK button. How if I want it to be there
all the time. This value will only be changed once in a
blue moon.

Do I have to place it in another procedure?

Thanks,
Sheela


-----Original Message-----
Sheela

The destination should be on the left of the equation.
Therefore the form should take it's values from the
sheet.
If this happens try changing

Worksheets("Main").Range("I6").Value = txtMaxDmc.Value

to

txtMaxDmc.Value = Worksheets("Main").Range("I6").Value

Peter
-----Original Message-----
Hello,

I have created a Dialog Box which has a link to a
spreadsheet. Whatever changes I make in the
spreadsheet,
it should update the dialog box, but its not doing that.

Below is the code:

Private Sub cmdOK_Click()
On Error Resume Next

Worksheets("Main").Range("I6").Value = txtMaxDmc.Value
Worksheets("Main").Range("J6").Value =
txtMaxDmcFirm.Value
Worksheets("Main").Range("K6").Value =
txtMaxDmcNonFirm.Value
Worksheets("Main").Range("I8").Value =
txtPeakPeriodCharge.Value
Worksheets("Main").Range("I9").Value =
txtOffPeakPeriodCharges.Value
Worksheets("Main").Range("I11").Value =
txtWeldingSetFee.Value


Do I have place this coding in a different function?

Please help!

Thanks,
Sheela
.

.