Search results

@Luke yes you are correct

@Abhijeet did you try that code which was given by me

@Abhijeet please try this code in your workbook Module when ever you change in your any worksheet then the workbook will save Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) ActiveWorkbook.Save End Sub Hope it clear your problem other wise please give some...

@SirJB7 Good Day My hearty congrats on your 6k milestone, we are really lucky to get you as a teacher, your solutions, replies, warnings helping nature every thing is good and cool Thanks once again please keep guiding us With Regards

@Luke M my hearty Congrats on your 5k milestone, keep guiding us Cheers :D

@SirJB7 Hello sir, Sorry for my late replay, Thank you very much for your guide lines sir, my system administrator is trying to recover the data and i gave him the details of your also now he trying as per your instruction let see what happen and he told me one part is melted with heat so...

@Luke M Hello Sir, Good Day Sorry for my late replay, sir un fortunately my hard disk is corrupted and i have no data all the backup data also damaged so we are try to recover the data from that hard disk. i tried your latest code in my friend desktop it's working perfect Sir, really...

Hello Sir, Thanks for your New Code I Check with your new Sample Workbook, when i press the PostBooking Button then i got some Msgs they are 1. We are now working with Worksheet:Gate Way 2. inDate has a value of: given date (11/7/2013) 3. outDate has a value of: given Date...

Hello Yes i Double check the code

@LukeM Sorry to give you pain As per you instruction i go through the line by line with pressing the F8 button without any error msg it's pass the line when i reach the line iRow = Range("Dates").Find(inDate, , xlValues, xlWhole).Row when i press the F8 again then i got the error msg for...

Hello Sir again i got the same Object Variable or With block variable not set in the immediate Window i got this Date Range: $A$8:$A$740 indate: outDate: Date Range:$A$8:$A$740 Sir is it possible to chat with you Thanks SP

@LukeM Thanks for your Sample File, sir i have small doubt that is sir i can't understand why the problem is starting from my side when the file is working in your system then why it's not working in mine, off course i am using Windows 8 - Office 2007. is there any option to set in my...

Congrats Sir

@Luke M Sorry for my late replay, as per you new code i change that one but again i get the error code for your reference i attach the file Thanking you With Regards SP

@Luke M Thanks for your code i got one error Msg when i run the code that is Object Variable or With Block Variable not set error line is iRow = Range("Dates").Find(inDate).Row Thanking you With Regards SP

@Luke M Thanks for your replay actually in Sheet1 Range ("C37") there i mention as "Booked","Available" with Reference the D37 in D37 i use the formula as =IFERROR(INDEX(Booking_Data,MATCH($C$20,Dates,0),MATCH($C$31,Function_Halls,0)),"") and C20 has a Check in Date G20 has a Checkout...

Hi all Good Afternoon i need some help to create a code for booking system that is i want to check the Check in Date and check out date, i have one code which is working for single criteria but when i try to use 2 criteria then i got a error Msg for Type MisMatch the code is Sub...

Deb if i want to extend the Column then

@Deb Again After Long time i got suggest from Deb great, Thanks man it's working perfect Cheers Have a Nice Evening Thanks, Thanks Once again [Solved]

@oldchippy Thanks for the above formula and quick response but i need VB Code and my data started from A1 Thanks

Hello Good Afternoon i need some help that is i have some address in the columns and i want to separate into rows in one column Example: ` Name Address1 Address2 Address3 Name Address1 Address2 Address3 Result: Name Address1 Address2 Address3 Blank Blank Name Address1 Address2 address3...

Nice One sam and it's more helpful Thanks

@paradise Hi in your given example file with light blue color shaded which is link to date field but i am little bit confuse on this can you give us some more details the date filed is locked or what as a blind shot i did this...

Hi Luke, My Hearty Congrats on your Birthday :D :p Cheers

@ahamed Hi Sorry for my late replay, Please change the previous codes one line the old code is ws.Range("A" & titlerow & ":A" & lr).EntireRow.Copy Sheets(myarr(i) & "").Range("A1") Change to ws.Range("A" & titlerow & ":A" & lr).Range("A1:F2000").Copy Sheets(myarr(i) &...