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: *

  1. Store300

    Path Name Nightmare

    Help! Some bright spark is moving our server and we have to change any UNC references (//Server name/path.....) to 'drive letters' 'G:\Path.....'. I've inherited a suite of db's which have UNC's all over the place (modules, forms, you name it, its got it). Does anyone have a (relatively) easy...
  2. Store300

    #N/A values

    Try =If(IsError(Vlookup(XX)),"0",Vlookup(XX)) Store300 Store300@ftnetwork.com
  3. Store300

    Changes cells from combobox on protected sheet??

    It may be that because the ComboBox has the focus VBA can't recognise the sheets. If so, the easiest way around it is to start the ComboBox_Change() subroutine with Range("A1").Activate (or any other cell) to remove the focus from the ComboBox. Store300 Store300@ftnetwork.com
  4. Store300

    Password Protection in Excel VBA

    The password can, as with all passwords, be broken and there are packages to do this however there's not a lot more you can do and it does require some effort to break them. Its not something that somebody would be able to break in the everyday run of things. Store300 Store300@ftnetwork.com
  5. Store300

    Load comma delimited string to worksheet

    Workbooks.Open Filename:= MyFile.csv Activeworkbook.SaveAs Filename:= MyFile.xls FileFormat:=xlNormal Store300 Store300@ftnetwork.com
  6. Store300

    Help...need to set report's Orientation to landscape in the VBA!

    In excel its ActiveSheet.PageSetup.Orientation = xlLandscape You're going to tell me its for Access aren't you? Store300 Store300@ftnetwork.com
  7. Store300

    Excel VBA Automating Subtotals Function

    You can automate the Data>Subtotal function with [MyRange].Subtotal GroupBy:=[Column to Subtotal on (e.g. 1), Function:=xlSum, TotalList:=[Columns to Subtotal e.g. Array(2, 3, 4)], Replace:=True, PageBreaks:=False, SummaryBelowData:=True Store300 Store300@ftnetwork.com
  8. Store300

    How to send email from a vba script

    Roy, Strangely enough Excel doesn't allow for simply adding body text to an email. I tend to use Access if I want to do this (why Access can and Excel can't is anyone's guess I'm afraid). Store300 Store300@ftnetwork.com
  9. Store300

    Is there an option in Excel to stop it showing Exponential Numbers

    Format the cells that the data goes into as text bfore the transfer occurs? Store300 Store300@ftnetwork.com
  10. Store300

    Excel 97 and Excel 2000 compatibility problem

    Excel 97 doesn't support PivotCaches, you should should PivotTables instead. Store300 Store300@ftnetwork.com
  11. Store300

    Automatic links in Excel

    Workbook([MyWorkbook]).Close SaveChanges:=True Store300 Store300@ftnetwork.com
  12. Store300

    Automatic links in Excel

    Workbook([MyWorkbook]).Open filename:=[MyName], UpdateLinks :=0(or 1,2 or 3) Value Meaning 0 Doesn't update any references 1 Updates external references but not remote references 2 Updates remote references but not external references 3 Updates both remote and external references Store300...
  13. Store300

    Pasting formulae only

    The only drawback with that is that is will overwrite any values inbetween the formulae but if that isn't a problem then pjm's method is a darn sight easier. :) Store300 Store300@ftnetwork.com
  14. Store300

    Pasting formulae only

    It is possible through a VBA Macro: The macro below will run through whichever range you set as [MyRange] e.g."A1:A20" & paste the formulae into column B Sub PasteOnlyFormulae() For each x in range([MyRange]).cells CurrRow = x.row Target = "B" & CurrRow if x.HasFormula...
  15. Store300

    Hi, I am having a column(A) that h

    You can also try = IF(Len(A2)<1,2,1) Store300 Store300@ftnetwork.com
  16. Store300

    Looping through files in a folder...

    Alternatively you can use: MySearch = [MyPath] & &quot;\*.txt&quot; Found = Dir(MySearch) Do While Found <> &quot;&quot; Workbooks.open filename:=found Found = Dir Loop Store300 Store300@ftnetwork.com
  17. Store300

    Inserting pictures without a control

    This should work (or something along these lines): ActiveSheet.Pictures.Insert(&quot;C:\MyPath\MyPicture.jpg&quot;) Store300 Store300@ftnetwork.com
  18. Store300

    Finding an error (circular reference) using VBA in Excel

    There is this... MyRange = Worksheets([MySheet]).CircularReference.address Store300 Store300@ftnetwork.com
  19. Store300

    Delete Excel Links

    Ok, this is getting desperate. Does anyone know of a way of deleting Excel Links between workbooks? Preferably through VBA but right now I'll settle for manually hunting the little darling down. All suggestions gratefully received. :( Store300 Store300@ftnetwork.com
  20. Store300

    Toggling AutoSave On/Off through VBA in Excel

    Is this the autosave addin? Store300 Store300@ftnetwork.com

Part and Inventory Search

Back
Top