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 wOOdy-Soft 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 uberpudge

  1. uberpudge

    My Theme/Skin file is not being applied to controls

    I've tried the "styleSheetTheme" vs. "Theme" with no success. After a review of the output of the page with the CSSFriendlyAdapters.browser file excluded from the project contrasted to output of the page with the CSSFriendlyAdapters.browser file included with the project, I can only conclude...
  2. uberpudge

    My Theme/Skin file is not being applied to controls

    I forgot to mention that I am using the "ASP.NET 2.0 CSS Friendly Control Adapters 1.0" as well, which as it turns out is the cause of all of this malarkey. I excluded the "CSSFriendlyAdapters.browser" file from the project (to temporarily disable the CSS Friendly rendering) to debug a CSS...
  3. uberpudge

    My Theme/Skin file is not being applied to controls

    I am tinkering with Themes for the first time. I am designing in Visual Web Developer Express Edition 2005. I am running this on Vista Home Premium. I am deploying on the same box which is running IIS7 and has the following options installed: --IIS 6 Management Compatibility (All options...
  4. uberpudge

    More Efficient Method to format a date?

    Hello Binnit! Assuming you really need a formula in Cells J1:M1, change the last line of your posted code to the following: ActiveCell.Value = "=CONCATENATE(L3," & Chr(34) & "/" & Chr(34) & ",K3," & Chr(34) & "/" & Chr(34) & ",J3)" 'Chr(34) makes a " character so you can properly concatenate...
  5. uberpudge

    VBA testplan loop advice needed

    Hello Knifey, I'd use the .Offset function of the Range object. Assuming you're looping through A1:Z1 with a range object, i.e: For Eeach rngTest in Sheet1.Range("A1:Z1") 'Test here. Next rngTest You could add an offset like this: lngOffset = 1 For Eeach rngTest in Sheet1.Range("A1:Z1")...
  6. uberpudge

    How can I not print formulated text, see what I mean

    Hello Tony, Have you tried intercepting the "BeforePrint" event? Example: Private Sub Workbook_BeforePrint(Cancel As Boolean) Dim strFormula As String strFormula = Range("N6").Formula Range("N6").ClearContents Sheet1.PrintOut...
  7. uberpudge

    Splash and MDI

    Hello OOzy, Try adding a Timer control to the splash screen and set the Interval property for the number of milliseconds to display the form (number of seconds * 1000). In the handler for the Timer event, hide and then unload the splash screen. For example: Private Sub Timer1_Timer()...
  8. uberpudge

    Simple "Until EOF" procedure??

    Hello Sagain2k, The Interaction collection contains and EOF function. Here's an excerpt from the help file: EOF Function ------------- Returns an Integer containing the Boolean value True when the end of a file opened for Random or sequential Input has been reached. Syntax EOF(filenumber)...
  9. uberpudge

    Excel Window Size

    Hello StevePB, If you want the userform to fill the screen (hiding the userform) try the adding the following in the UserForm code section: Private Sub UserForm_Activate() SetUserFormSize End Sub Private Sub UserForm_Initialize() SetUserFormSize End Sub Private Sub UserForm_Resize()...
  10. uberpudge

    Inputbox - Excel 2000 - Dates

    Hello Nick, Maybe my thinking is backwards here, but have you tried reformatting the string to your needs once it has been input? Try this function: Public Function ConvertToDMY(ByRef strChosenDate As String, Optional ByRef strDelimiter As String) Dim strDay, strMonth, strYear As String...
  11. uberpudge

    Use VBA to set print to fit page size - Help Please.

    Hello William! Try using this before you print: ActiveSheet.PageSetup.FitToPagesWide = 1 ActiveSheet.PageSetup.FitToPagesTall = 1 Hope this helps, Pete
  12. uberpudge

    Excel Window Size

    Hello StevePB! Application.WindowState will set the window state for the whole application (Excel in this case). Try using this instead: ActiveWindow.WindowState = xlMinimized This way only the active window is affected. If you have mulitple windows open and you want to minimize them...
  13. uberpudge

    OnTime statement problems

    Hello LSIGuy, When I use OnTime and it cannot find the macro I want to run (Sub or Function - it doesn't matter, you can run both with OnTime), all I usually have to do is fully qualify the reference to the Sub or Function. For example: Application.OnTime Now + TimeValue("00:30:00")...
  14. uberpudge

    vba in vb application

    Hello Xian, As long as you make your your VB project includes a reference to the Microsoft Excel Object Library (Project -> References ->[Scroll down and place a checkmark to Microsoft Excel {Version Number} Object Library]), you should be able to use the VBA Code with the Excel sheet. Hope...
  15. uberpudge

    Type Mismatch Error 13 calling a procedure in Userform1

    Hello JazzyLee, Perhaps posting the code which gives the Error 13: Type Mismatch would help us help you better. Also, have you tried using: Load UserForm1 instead of: Call UserForm1.UserForm_Initalize Normally, event handlers are declared as Private and calling them from other modules...

Part and Inventory Search

Back
Top