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!

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

Search results for query: *

  1. ck1999

    Galvanize on top of Phosphate

    why not use a water based RP? This can be easily cleaned off and will provide better corrosion protection that an iron phosphate line. The chances are that the RP he wants to cut with xylene will be a lot harder to clean than a synthetic RP Or use safety solvent (142 flash solvent) and cut...
  2. ck1999

    Copying an open excel document with VBA

    I just tried this by modifying your code and the original file name stays open! Not sure what you mean by location ActiveWorkbook.SaveCopyAs NewFileName ck1999
  3. ck1999

    Phospating

    Contact Heatbath. They are the leader in manganese phosphate in the industry. Or contact your supplier. Have you checked: Free Acid Total Acid Iron Content ck1999
  4. ck1999

    Excel to Outlook

    Have you referenced the outlook object library? ck1999
  5. ck1999

    Show off your vba project

    electricpete, if you click on the module name and then click on the properties icon in the toolbar at the top (or hit f4) it will display the properties window and the only property is name ck1999
  6. ck1999

    Controlling the amount of starch entering the drains in a paper mill

    You can look using enzymes to reduce the starchs and COD you will need a holding tank for this to work. I have heard they are very effective in cardboard facilities ck1999
  7. ck1999

    VBA Code for solver constraint not effective

    CardinalKid, Sub test() counter = 1: For i = 1 To 1 For j = 2 To 53 Sheets("DATA").Cells(14, j).Value = Sheets("DATA").Cells(counter, j).Value Next j counter = counter + 1 Worksheets("data").Activate SolverReset SolverOptions , 0.001 'adding constraints SolverAdd "$B$12:$AY$12", 1, "1"...
  8. ck1999

    Graphs in Excel 2007

    See if this helps it uses vba and make more work but hopefully it will help you Sub FixAllPies() Dim pie As ChartObject Set pie = ActiveSheet.ChartObjects("Chart 1") With pie.Chart.SeriesCollection(1) .Points(1).Format.Fill.Patterned msoPatternLightHorizontal...
  9. ck1999

    Graphs in Excel 2007

    To clarify this is excel 2007. Thanks to Microsoft for all the changes jk . I tried a pie chart and you no longer have the options you did with previous editions of excel. GeoPaveTraffic maybe you might want to label your pieces numericall and then have them ontop of your pie pieces and then...
  10. ck1999

    corrective actions for non-conforming products

    Our group is based off of some managers and some representatives. Usually production manager and employee where issue occurred, maintenance and quality manager or representative. ck1999
  11. ck1999

    Displaying most recent entry on excell sheet via another sheet

    You could use this code in the report workbook Sub getinfo() Dim wb As Excel.Workbook Dim sh As Excel.Worksheet wbname = ActiveWorkbook.Name Set wb = Workbooks.Open("\\server\network\data.xlsx") Set sh = Worksheets("sheet1") valuewanted = Range("B" &...
  12. ck1999

    corrective actions for non-conforming products

    Our company uses a CA team. This team is made up of QA, maintenance and production. This team works for us. It has been effective by thinking about the problem from differnt points of views. If production management does not care about QC then it will be hard to get employees consciousness...
  13. ck1999

    Checkbox sends program to other VBA form

    Do you have any other code? What about your before or after update options is there any code listed in them? There has to be other code somewhere. ck1999
  14. ck1999

    Excel and "Date" usage with formula

    My understanding of your question states that you would like to perform a calculation in the row that corresponds with todays Date. And then when tomorrow occurs. The product of todays equation will stay in the cell. If this is correct I would like at putting a macro in the workbook.open...
  15. ck1999

    A Drawing Problem

    Try this Private Sub DrawScales() dblDistTick = frmProfile.txtDistTick.Value dblElevTick = frmProfile.txtElevTick.Value Dim dclicks Dim eclicks Dim counter Dim yloc dclicks = (frmProfile.txtDistMax.Value - frmProfile.txtDistMin.Value) / frmProfile.txtDistTick...
  16. ck1999

    excel vba

    if they are always groups of 5 then assuming data in column a sub helping() dim jarray(100,5) ' Will do 100 sets dim keepgoing as boolean keepgoing=true ' Replace the 1 with whatever line the data starts in counter2=1 for counter =1 to 1000 step 6 jarray(counter2,1) = range("a" &...
  17. ck1999

    Exit Main Sub from within Internal Sun

    Have you tried End ck1999
  18. ck1999

    Powder Coating or Rubber Coating Galvanized Surfaces

    Powder coating is applied to galvanized surfaces all the time. You can either use an ironphosphate which slightly etches the zinc coating and allows for better paint adhesion or look at using a zinc phosphate. But this is regularly done in the metal finishing industry. ck1999
  19. ck1999

    Phosphate color change

    I think you may want to reduce the titration to about 10 - 12mL. In both of the stages. If you have to high of a concentration you will tend to over phosphate. Also If you use a White paper towel and whipe the parts off if the residue is yellow then it is phoshate if its red it it rust. Why...
  20. ck1999

    Phosphate color change

    We do not use color as an indication there is a test method ISO 3892 that explains how to calculate coating weights. Another easy method is Take a panel that has been phosphated 1. Immerse in acetone. 2. Then dry with hot forced air (hairdryer or something similar) 3. Weigh using an...

Part and Inventory Search

Back
Top