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 bkrike on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Recent content by wdverner

  1. wdverner

    Checking for zero before operation

    the legend that is PHV.
  2. wdverner

    Checking for zero before operation

    Hi All Quick Question I have this calculation Per: [SM]/[TW] What i want to do is before i do this, check if TW is zero- if it is then Perf=0 else carry out the operation.. Whats my best way of achieving this? Many Thanks to all.
  3. wdverner

    Changed to workgroup now cant access pc?

    So if i cant remember any of the LOCAL user accounts nor the ADMINISTRATOR password then whats my options?
  4. wdverner

    Changed to workgroup now cant access pc?

    hi all I noted the pc was still joined to an old domain that no longer existed. I changed this to workgroup called HOME and then rebooted as requested. Previously I accessed the PC with username QA and password QA. HOwever after the PC rebooted successfully this username or password no longer...
  5. wdverner

    Print Preview shows blank page

    Apolgies if this is in the wrong forum, but I am hoping someone can help. In Internet Explorer when I open a page that contains a java applet that displays a graph I can see the graph ok. However when I go to Print Preview the graph disappears and i only see a blank space where it should be...
  6. wdverner

    Excel formula returns cell reference and not value

    Hi all, As title states... Cell A6= TEST If i enter =A6 into cell B1 I get returned =A6. and NOT 'TEST' as I would have hoped. Am sure this is a simple one but cant find whats wrong?!
  7. wdverner

    Command button to open PDF files

    In case it helps others here is a solution I have just done: Dim imagepath As String Part = Forms!frmPart!PartID imagepath = "c:\temp" & "\" & PartID & ".pdf" Me.pageDrawing.SetFocus objWebBrowser.Navigate imagepath
  8. wdverner

    output to cells

    Product A 1 2 3 4 5 1,2,3,4,5 are unique IDs to identify a part name. e.g. 1= Front Grey 2= Back grey 3= Red front 4= Black Sides 5= White Front These 5 parts make up Product A. Product B 1 2 3 4 6 Part 6= Yellow Back If we compare Product A to Product B there are FOUR...
  9. wdverner

    output to cells

    Each product uses 10 unique parts. All that I am intested in is comparing the differences between the 2 sets of 10 numbers. It needs to loop through comparing all nine products to product A (starting point) and output this. It will then find the lowest difference and copy this product into...
  10. wdverner

    output to cells

    Hi Bong, Each product has 10 UNIQUE parts.... So if Prod_A uses 1,2,3,4,5 Prod_B uses 1,2,3,4,6 Prod_C uses 1,3,6,7,8 Id make Prod_B after Prod_A as they share 1,2,3,4 whereas Prod_C only uses 1,3. if you catch my drift..... :)
  11. wdverner

    output to cells

    Hi Glenn, Thanks for the tip! Sorry to ask, but am I going about this in the right way? To explain what I want to achieve is this: I have 10 products(rows) in a spreadsheet with 10 columns. Each cell contains an integer to identify a part which makes up that product. I want to find the...
  12. wdverner

    output to cells

    Hi all, I have this macro: Dim r As Integer, c As Integer, n As Integer For r = 2 To 5 n = 0 For c = 1 To 10 If Cells(1, c) <> Cells(r, c) Then n = n + 1 Next c If n Then MsgBox "Row 1...." & r & "=" & n & " Parts different" Next r Rather than output it in a MsgBox is it possible...
  13. wdverner

    output to cells to in excel

    Hi all, I ahve this macro: Dim r As Integer, c As Integer, n As Integer For r = 2 To 5 n = 0 For c = 1 To 10 If Cells(1, c) <> Cells(r, c) Then n = n + 1 Next c If n Then MsgBox "Row 1...." & r & "=" & n & " Parts different" Next r Rather than output it in a MsgBox is it possible...
  14. wdverner

    Complex Comparisons

    Hi Skip/All, Ignore my previous post, I have been playing about with it... I now get the error in MS Query: Could not add the table ''c:\tool\Book1'.Sheet5$''. any idears....?
  15. wdverner

    Complex Comparisons

    Skip, Mnay thanks for the heads up on Query. Its not something I have used before, it would be much appreciated if you can point me where I am going wrong... in order for your query you shown me to work how was the spreadsheet constructed? Like this? Col A Col B 1 1 2 2 etc?

Part and Inventory Search

Back
Top