Search results for query: *

You are right Skip , my function return a value in a cell from another ... Another thing I want to clarify: In a cell I have a "data validation list" (R11) . When I select an item from the drop-down list of DV (data validation) I want to trigger a subrutine to write a value in another cell...

Thank you for the answer!

Hi everyone! A have a worksheet with the following data: AZ5=4 , BA5=3, BB5=2, BC5=1 in column AP , I have a function in specific cells who copies the values from above cells: AP42=3, AP47=3, AP52=2, AP57=1, AP60=1 and so on.. (about 100 cells copies data from cells above) What I want: when I...

THANK YOU for your replies! It helps me much! I founded how to fix (PHV thanks!!!) : adr = exlSheet.Cells.Find(What:="Nechita", After:=exlSheet.[A1], LookIn:=xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False, SearchFormat:=False).Columns.Address...

I noticed something : if I remove or comment the line: "exlSheet.Cells.Find(What:="whatever", After:=ActiveCell, LookIn:=xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False, SearchFormat:=False).Select" , I have no problems opening .xls files (Excel...

Hi! I have a form in Access with a button with the code: Private Sub cmdPrintToWord_Click() Dim strSelect As String Dim appWord As Word.Application Dim appExcel As Excel.Application Dim doc As Word.Document Dim exlBook As Excel.Workbook Dim exlSheet As Excel.Worksheet...

Yes, that's it! Thank you Bong and Skip!

Hi! I have the code below : Sub PopulareCelule() Dim k As Integer Dim l As Integer k = ActiveCell.Column l = ActiveCell.Row For i = k To 35 If ActiveCell.Interior.ColorIndex = 4 Then Cells(l, i).Value = "yes" Else Cells(l, i).Value = "no" End If...