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 derfloh 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. ChristianDK

    Excel macro, stupid question

    Hello I at trying to make a macro that adds a formula into an excel worksheet by combining text and values from the worksheet. This works but will be inserted as text: Range("JusteretEndelig!A1") = "VLOOKUP(A1;[kIM" & Range("JusteretEndelig!g1") & ".xls]JusteretEndelig!$A$1:$G$11;7;FALSE)"...
  2. ChristianDK

    Excel VBA links to other files

    Hello Im trying to link to 125 other Excel files based on input from cells Sub Link() For i = 1 To ActiveWorkbook.Sheet.Rows.Count Range("Sheet1!B(i)") = "D:\Documents and Settings\New Folder\Range" & ("Sheet1!B1") & Range("Udtrækrapportpakker!B1") Next End Sub Im i totally off...
  3. ChristianDK

    Excel VBA links to other files

    Hello Im trying to link to 125 other Excel files based on input from cells Sub Link() For i = 1 To ActiveWorkbook.Sheet.Rows.Count Range("Sheet1!B(i)") = "D:\Documents and Settings\New Folder\Range" & ("Sheet1!B1") & Range("Udtrækrapportpakker!B1") Next End Sub Im i totally off...
  4. ChristianDK

    Macro running slow in Excel

    Thanks to the help on this forum i have made the following: Sub KlarTilUdskriftAlt() Sheets("Nøgl").Visible = False For i = 2 To ActiveWorkbook.Sheets.Count - 5 Set SheetMark = ActiveWorkbook.Sheets(i) If SheetMark.Visible Then...
  5. ChristianDK

    AutoFilter Field on a none selectet sheet?

    Hello Can anyone help me out on this topic: I got a large Excel workbook and need to run it on some slow computers. Sheets("sheet1").Select Selection.AutoFilter Field:=1, Criteria1:="=" But I like to be able to use autofilter without selecting the sheet. Something like...
  6. ChristianDK

    Use of range and edit cells in Excel

    Hello I'm having 3 problems and hoping to find some help here. I'm trying to move info from one cell to another or the footer 1. Set Range("sheet1!A1") = Range("sheet2!b2") Don't seem to work, any ideér's? 2. ActiveCell.FormulaR1C1 = "=sheet1!A1" This result in A1 = "=sheet1'!A1'", any way...

Part and Inventory Search

Back
Top