Search:

Type: Posts; User: AlphaFrog; Keyword(s):

Page 1 of 6 1 2 3 4

Search: Search took 0.48 seconds.

  1. Replies
    1
    Views
    13

    Re: find case in a certain cell

    I don't understand what that means.
  2. Replies
    12
    Views
    281

    Re: Open Directory for user to choose a file

    Dim wkb2 As Workbook, strFileName As String, FileFilter As String

    ChDir ThisWorkbook.Path

    FileFilter = "Excel 2003 (*.xls),*.xls," & _
    "Excel 2007 >...
  3. Re: Why the row selected is displayed in negative value : Range ().value = Target.row

    The code loops through each cell selected. With the first cell in the loop, it puts something like (1). Excel evaluates that entry to just its' numeric negative (like a currency value).

    Just...
  4. Replies
    12
    Views
    281

    Re: Open Directory for user to choose a file

    Set wkb2 = Workbooks.Open(strFileName, False, False)

    When the workbook is opened, the variable wkb2 is set to it. Just reference wkb2. It is the opened workbook regardless of the file name.

    ...
  5. Replies
    12
    Views
    281

    Re: Open Directory for user to choose a file

    Dim wkb2 As Workbook
    Dim strFileName As String
    Dim FileFilter As String

    ChDir ThisWorkbook.Path

    FileFilter = "Excel 2003 (*.xls),*.xls," & _
    "Excel...
  6. Replies
    12
    Views
    281

    Re: Open Directory for user to choose a file

    ChDir ThisWorkbook.Path

    FileFilter = "Excel 2003 (*.xls),*.xls," & _
    "Excel 2007 > (*.xlsx),*.xlsx," & _
    "All Excel Files (*.xl*),*.xl*," & _
    "All Files (*.*),*.*"

    GetFileName =...
  7. Re: Passing Text Box value to another Text Box

    Use something like this...


    txtAmount.Value = Format(MySum, "#,##0")
  8. Replies
    12
    Views
    281

    Re: Open Directory for user to choose a file

    Is "Element List (whatever the user had named the file).xlxs" in the same folder as the workbook that has the macro code?

    If yes...


    ChDir ThisWorkbook.Path

    FileFilter = "Excel 2003...
  9. Re: Passing Text Box value to another Text Box

    I don't know what that format is. It doesn't work for my version of Excel.

    Try something like this. I can't test it. You may have to adjust it.


    Private Sub txtDiscount_Change()
    ...
  10. Re: Passing Text Box value to another Text Box

    Private Sub txtDiscount_Change()
    Me.txtTotal = Me.txtAmount - Me.txtDiscount
    Me.txtPaid.Text = Me.txtTotal
    Me.txtRest = Me.txtTotal - Me.txtPaid
    End Sub


    Private Sub...
  11. Replies
    4
    Views
    176

    Re: Crazy Date Formatting????

    Select the 4 columns
    Replace (Ctrl+H) the / with a / to convert the dates en masse
    Format them to suit
  12. Re: User Form data entry as date and number!!!

    Try this...


    ws.Cells(nr, 1) = CDate(Me.TextBox1) 'Date


    ws.Cells(nr, 4) = CCur(Me.TextBox4) 'Amount
  13. Re: How to read approx 200 excel file in a single excel sheet one by one.

    RDBMerge is a user friendly way to Merge Data from Multiple Excel Workbooks,
    csv and xml files into a Summary Workbook.

    RDBMerge, Excel Merge Add-in
  14. Replies
    4
    Views
    176

    Re: Crazy Date Formatting????

    When you imported the data, the dates were seen by Excel as text and not serial dates. A simple way to coerce the text-dates into serial dates is to select the date column and simply do a Replace...
  15. Re: How do I get a label in a scatter plot instead of "Series 1 Point"?

    Hide columns H:I
    Make an Scatter chart with data range G6:K98 and data series in Rows
  16. Re: How do I get a label in a scatter plot instead of "Series 1 Point"?

    It works for me. How is your chart data layed out.

    I put the series names in A2:A5
    The X-axis values in B1:M1
    And the Y-Axis values in B2:M5
    A1 is blank

    Used A1:M6 as the source data (series...
  17. Re: When Excel macro can't capture steps I carried out

    I usually just do a web search for something like Excel VBA Insert Picture in Comment

    This was the 2nd link in the search results. It's a step-by-step guide.
    VBA Code To Insert An Image Into A...
  18. Replies
    3
    Views
    65

    Re: VBA - Bulk Renaming of Files

    Try this...


    Name strPath & strFile As strPath & Split(strFile, "_")(1) & Mid(strFile, InStrRev(strFile, "."))
  19. Replies
    2
    Views
    95

    Re: Conditional formula

    Your DV formula is saying that if A4 = -100 then B4 must = -100 else B4 = "" (blank)

    Try this...
    =IF(A4=-100;B4=-100;TRUE)

    This says Else whatever is in B4 is TRUE
  20. Replies
    10
    Views
    156

    Re: Sort a worksheet

    IDK

    Can you post a desensitized workbook that exhibits the same issue?
  21. Replies
    10
    Views
    156

    Re: Sort a worksheet

    Range("A1:R17").Sort Key1:=Range("C2"), Order1:=xlAscending, Header:=xlYes

    Range("C2").CurrentRegion.Sort Key1:=Range("C2"), Order1:=xlAscending, Header:=xlYes

    These above syntax should work.
    ...
  22. Replies
    2
    Views
    91

    Re: Sum between rows

    If the Data Validation lists are in C1 and C2

    =SUM(OFFSET(B1,MATCH(C1,A1:A12,0)-1,,MATCH(C2,A1:A12,0)-MATCH(C1,A1:A12,0)+1))
  23. Replies
    1
    Views
    42

    Re: Invalid Data in Validation Cells

    Use a Worksheet_Change event macro to automatically clear the dependent dropdowns when a parent dropdown changes.

    To install this code in the Worksheet's code module:


    Right-click on the...
  24. Re: Better way than Range(Selection,Selection.End(xlDown)).copy ?

    Try this...


    Range("C136", Range("C136").End(xlDown)).Offset(0,1).Copy
  25. Re: Macro to loop thru sheets adding new columns until it hits particular sheet then stops

    For Each ws In ActiveWorkbook.Worksheets

    If ws.Name = "Master" Then Exit For

    ws.Range("A:B,D:D,L:L,N:N,Q:S,V:V,Y:Y,AB:AB,AE:AE,AK:AL").EntireColumn.Hidden = True

    ...
Results 1 to 25 of 150
Page 1 of 6 1 2 3 4