Hi,
I am using below code to update record based on ID but i am getting Runtime error 3704 can any one help me on this.
Private Sub LblAllot_Click()
Dim counter As Integer, cn As New ADODB.Connection, ssql14 As String
counter = 0
DB_Open_Connection
For i = 0 To lstClaimLineList.ListCount - 1...
No worries.. actually i have 2 list boxes in a userform and this scroll bar linked to those two listboxes. if we scroll the scroll bar those two listboxes should scroll horizontally (column wise)
Content of List box only... as of now i am using below code but itis moving row wise...
Private sub Scrollbar1_Change()
if scrollbar1.value <= listbox1.columncount -1 then
listbox.listindex= scrollbar1.value
end if
end sub
as per my knowledge we dont have option called Column index in vba...
On a form, field controls of several fields have the Validation Rule set to
"is Not Null" . The fields in the underlying table do allow null. The form
validation rules do not appear to be working as the form is allowing those
fields to be tabbed through without any error message popping up...
Hi,
Validation rules are not working in access form for first time user. but its working after key some thing in the field.
Can anybody help me on this.
Regards,
Bob.
Hi Madhu,
Please find the updated code:
Sub model()
Dim aRange As Range
Dim i As Long
On Error Resume Next
Set aRange = Application.InputBox(Prompt:="Enter range", Type:=8)
If aRange Is Nothing Then
MsgBox "Operation Cancelled"
Else
aRange.Value =...
Sub model()
Dim aRange As Range
Dim i As Long, l As Long
'Dim LR As Long
On Error Resume Next
Set aRange = Application.InputBox(Prompt:="Enter range", Type:=8)
If aRange Is Nothing Then
MsgBox "Operation Cancelled"
Else
aRange.Value = Application.InputBox(Prompt:="Enter Model")
End...
Hi Saumya,
Can you clarify on Pending column is that pending for whole week.
If it is whole week better to put individual day then we can calculate average prod for the team.
if you provide the 2 weeks data then we can show a graph with expected (High /Low)volumes in coming weeks on a...
Hi Prasad,
My understanding on your thread is you wanted to move all rows which have "Fail" status under Overall column to new sheet and Type column should be Follow up date extended to 48 Hrs.
Please correct me if i am wrong.
and one more thing do you want to run a macro manually or macro...
Hi Luke & Hui,
Thanks for your response on this.
Luke sorry for the confusion i wanted to concatenate A & B column values like below
A Column = 123456
B Column = 1
I would like to combine both A & B Column values in "C" = 123456.01 (formula= A+&"."&"0"&B
if suppose in B Column value is...
Hi All,
I need your help to concatenate two cells values through macro.
Below are the values:
A(Column) B (Column) C(Column)Need help on this column
123456 1 123456.01
123457 15 123456.15
I need the values in column "C"
Regards,
Sattt...
Hi Jenwren,
I think you need to freeze (using "F4") the values in formula before dragging formulas.
if you provide the formula that would be help full to anser your question.
regards,
Satish.
Hi,
I wrote a macro for sending mails from excel sheet as attachment.
below is the code:
Sub Mail_workbook_1()
Dim wb As Workbook
Dim I As Long
Set wb = ActiveWorkbook
If Val(Application.Version) >= 12 Then
If wb.FileFormat = 51 And wb.HasVBProject = True Then
MsgBox...
Hi,
I have excel sheet which has employee performace like below:
A Name B Parameter C Jan D Feb E Mar F Apr G May
A1 Satish B1 Prod% C1 98% D1 95% E1 97% F1 96% G1 94%
A2 Satish B2 Acc% C2 98% D2 95% E2 97% F2 96% G2 94%
A3 Sarita B3 Prod% C3 98% D3 95%...
Below are the clarifications :
Can you clarify what is in columns A:G?
- A:G columns has the information till 50 rows like A= Cust Name, B =Costomer Code, C=Payment Method, etc.,
Which file name?
- i need current workbook name should be appear in H column till last row which have the info...