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 Mike Lewis 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
  • 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

    [col1] [col2] col3 col4 Feb.12 Mar.2 Mar.5 mar.12 88 v v v ' v means tick mark 55 v 75 v 45 v v v 100 v 200 v if i find column Mar.12 how do i check feb.12 and screen screen part i can find but...
  3. limeg95

    determain the column

    hi Skip could you help me
  4. limeg95

    determain the column

    skip Apologies Feb.12 mar.2 mar5 mar12 40 v v 50 v'tickmark) v 50 v 120 150(not match with feb.12 to screen) 60 v for example user enters Mar.2 macro goes to mar,2 column check left column the number 40 with...
  5. 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...
  6. limeg95

    grab everything

    thanks Skip it works . thanks a lot
  7. limeg95

    grab everything

    thanks skip this is the one it works if mYScreen.getstring(i,2,5) <> "<<<<<" then Print #1, MyScreen.Area(i,28,i,91).value end if
  8. limeg95

    grab everything

    i got it thank skip if MyScreen.GetString(i,2,4) = "<<<<" then Print #1, MyScreen.Area(i,28,i,91).value end if i = i +1
  9. limeg95

    grab everything

    skip could you please help me i = 4 do Set searchcomplet = Myscreen.Search("<<<<<') if searchcomplet = "" thne Print #1, MyScreen.Area(i,28,i,91).value end if Loop until >27
  10. limeg95

    grab everything

    i did this way If Not MyScreen.Search("END OF REPORT") Is Nothing Then Print #1, MyScreen.Area(i,28,i,91).value end if
  11. limeg95

    grab everything

    Oh Skip what is wrong. spinning round if MyScreen.GetString(MyRw,2,5) = "<<<<" then else Print #1, MyScreen.Area(i,28,i,91).value end if
  12. limeg95

    grab everything

    skip sorry to bug you again. could you help me i tried if not also still it is showing the <<<<<< in text document
  13. limeg95

    grab everything

    i am sorry skip it is if Not MyScreen its type error mistake
  14. limeg95

    grab everything

    SKIP I tried if Not MyScreen.GetString(MyRw,2,5) = "<<<<<" STILL SHOWING For i = 9 To 26 Set MyArea = MyScreen.Search("<<<<<") MyScreen.MoveTo MyArea.Bottom, MyArea.Left MyRw = MyScreen.Row if MyScreen.GetString(MyRw,2,5) = "<<<<" then Print...
  15. limeg95

    grab everything

    skip i tried this ay still it is shoing <<<<<< could you help me adn i tried instead of <<<<<< "END OF REPORT" SHOWS STILL. how can i get rid of <<<<<< in text document For i = 9 To 26 MyScreen.Search("<<<<<<") MyRw = MyScreen.Row if Not...
  16. limeg95

    grab everything

    skip no i have catpures all datas in the page upto end of report what happens <<<<< also shows in the text document **** END OF REPORT ******...
  17. limeg95

    grab everything

    skip thanks i got it. could you help me but small issue i am facing here i have everyhting i want to exclude <<<<<<< this line in first page how do exclude here is the code For i = 9 To 26 Print #1, MyScreen.Area(i,28,i,91).value Next i...
  18. limeg95

    grab everything

    skip sorry to forgot to mention the report shows 72 pages all pages in text document except <<<<< each page has <<<<< i have code like this could you please check this code. do do sDetail = MyScreen.Area(4,4,24,130) Loop Until Myscreen.GetString("<<<<<<") MyScreen.SendKeys ("<Enter>") Loop...
  19. limeg95

    grab everything

    skip thanks in last line it shows <<<<<<< but i dont need <<<<<<<<
  20. 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 ****...

Part and Inventory Search

Back
Top