Search results for query: *

Hi The is a requirement that sharepoint tables are to be linked to access db so it can be accessed globally. The issue is if the data size increases it becomes very slow. Is there any standard approach to it? Or Is it good to use offline/online toggling programmatically for making changes or...

Hi Check ur code follows the rule. NORMINV(p, mu, sigma) where p, mu, and sigma are numeric values. Because p corresponds to a probability (see note 1), it must be greater than 0 and less than 1. Because sigma represents standard deviation it must be greater than 0...

Hi Reinstalllig MS Office package may solve this problem. Stefen

Hi Code like below With appexcel.Workbooks(activeworkbook.Name) .Worksheets("Sheet1").Unprotect "sherman" .Worksheets("Sheet1").Range("D3:D12").Interior.ColorIndex = 41 .Worksheets("Sheet1").Protect "sherman" End With or pass...

Hi Thanks a lot for sharing the code. Stefen

Hi Poduska, Could you please post the code for reference. Stefen

Hi Please paste the full code. stefen

Hi you have to use advanced filter with criteria like below TL TM Andy blank blank Andy this holds for OR condition. Thanks stefen

Hi you have to use worksheet_selectionchange event Private Sub Worksheet_SelectionChange(ByVal Target As Range) Call Small_Group_supplement(Target.Parent) End Sub and the locking code could be as follows Sub Small_Group_supplement(ByRef sh As Worksheet) With sh .Unprotect "Password"...

hi You may have to move all your code and sheets to new excel file.I have seen an addin called CLEAN PROJECT which takes all the worksheet in a workbook to fresh xls file and then moves the code to the same fresh xls . I guess it should work in your case and it may be memory related problem...

Hi Try this Private Sub ComboBox1_Change() Dim lastrow As Long Dim i As Integer: i = 1 Me.ComboBox2.Clear With Sheet1 lastrow = .Range("a65536").End(xlUp).Row For i = 1 To lastrow 'column 1 has dept infor and column 2 has employee info If .Cells(i, 1)...

Hi You can either use xml DOM object to extract the information and put in excel as in link http://www.tek-tips.com/viewthread.cfm?qid=1214201 or use ADO object as in http://www.ozgrid.com/forum/showthread.php?t=27818 Regards, Stefen

Thanks Geoff.

Thanks Geoff.

hi use the below code Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo Err_Exit Application.EnableEvents = False If Target.Address = "$C$3" And Target.Cells.Count < 2 Then Sheet1.Cells(1, 1).Select rownum = Sheet1.Cells(4, 7) Sheet1.Cells(22, 8) =...

hi I have a worksheet wherein i have added validation list for entire column B . if the user paste non list item over any cell in that column the validation fails to message to user about the wrong value entered in the list. Is there anyway other than disabling paste, i could do this. Thanks...

Thanks Skip.

hi I have a question about Enable Events. This property is True by default. however if via code when it is changed to false,it should be reset to True. Excel will not reset to true as it do for screen updating. Is there anyway to have the excel turned it on by default..as code to turn it on...

Hi May be following code help you Sub check() Dim objList As ListObject Dim sh As Worksheet Dim rng As Range ' i have the list object in sheet1 Set sh = ThisWorkbook.Sheets("Sheet1") With sh If .ListObjects(1).Active Then Set rng = Intersect(ActiveCell...

Thanks for the site wjwjr