Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  • Users: limeg95
  • Content: Threads
  • Order by date
  1. limeg95

    option button in excel

    Hi! i am trying to do when i click the option button shuld not allow to enter in range the below what is wrong in it. is it possible? Private Sub OptionButton60_Click() Dim RngPST As Range Set RngPST = Sheets("Sheet1").Range("A14:A600") Sheets("Sheet1").Range("A14:A600").Value = "" End Sub
  2. limeg95

    determain the column

    Hi! i have excel form 8 to 40 rows find the specific column which put tick mark when it has left column has numbers with screen, if it matches put tick mark in that specific oolumn for exampl Mar.2 mar4, mar.12 there are three column find mar.12 column put tick mark if the mar.4 has number with...
  3. limeg95

    grab everything

    Skip thanks in advance i have code grab everything on screen till end of report but my code grab <<<< this too coudl you help me thanks her eis the code ------------------ *** END of report ****...
  4. limeg95

    keep on macro running

    skip this is the code i am using , when i step through it works fine but when it runs it keep on going ascenind gorder and descending order 48,47, 46, 45 becasue of j = j -1 coudl you help me. thanks ------------- For j = 7 To 48 DSFPT1 = Trim(UCase(MyScreen.GetString(6, 9, 6))) DSFPT =...
  5. limeg95

    search word in thrid occurance

    Skip I am searching a word 'Total"in report there are three totals i want only third total with corresponding value this search first total here is the code For j = 5 To 41 dfst = Cells(j, 1).Text if dfst = MyScreen.GetString(1,15,5) then If dfst <> "" then do Set MyArea =...
  6. limeg95

    find minimum and maximum

    hi! i am trying to figure it out earlist starting time and latest finished time here is the code. but i could not find out max and min thanks in advance. ***************************** If Right(JobName, 1) = "*" Then For j = 1 To 16 ''' If...
  7. limeg95

    find getstring column

    i find row and column may be 54 or may be 55 how do i put it here. Trim(MyScreen.GetString(MyRw, 54, 5))
  8. limeg95

    comparing from excel to screen

    Hi! i am checking against excel to screen if account matches in screen corresponding value into excel the below code works fine, but it takes more than half an hour. is it fastest way to do that? thanks in advance Do For i = 2 To 3000 Account = Cells(i, "E").Text MyScreen.MoveTo 4, 15...

Part and Inventory Search

Back
Top