Posts by VBA Noob

Re: Formula To Match A Given Number With The Nearenst Sum.

This sum link may be of interest

http://www.dailydoseofexcel.com/archives/2005/10/27/which-numbers-sum-to-target/

VBA Noob

Re: Changing The Sourcedata Of A Current Pivottable

fecurtis,

MODERATOR NOTICE: This topic has also been posted on other sites and may already have an answer elsewhere. Please take this into consideration when answering this question

*

http://www.excelforum.com/showthread.php?t=645674

PM Dave Hawley if you agree to the forum rules

VBA Noob

Re: Two Spreadsheets Within Powerpoint

Panic,

MODERATOR NOTICE: This topic has also been posted on other sites and may already have an answer elsewhere. Please take this into consideration when answering this question

*

http://www.excelforum.com/showthread.php?t=643858

PM Dave Hawley if you agree to the forum rules

VBA Noob

Re: Check If A Certain Row Number Is In A Selection

If the user has more than one row selected then try

If Selection.Cells(Selection.Cells.Count).Row >= 152 Then
    MsgBox "Cannot delete beyond row 152!!"
Else
    Selection.EntireRow.Delete
End If

VBA Noob

Re: Conditional Formatting Rows

Select Columns A to L then format > conditional formatting.

Then enter

=OR($L1="",$L1="No")

and set formatting as required

VBA Noob

Re: Look Up First 3 Characters In Cell

You could try

=VLOOKUP(LEFT(A1,3)+0,Sheet2!$A$1:$B$3,2,FALSE)

VBA Noob

Re: Formula To Subtract A Time Value

Try =D1-A1

format the cell as [h]:mm

VBA Noob

Re: Copy Textbox Text To Clipboard

I tested it like this and worked fine

Sub Test()
MsgBox Sheets("Sheet1").Shapes("Text Box 1").TextFrame.Characters.Text
End Sub

VBA Noob

Re: Copy Textbox Text To Clipboard

Maybe

Sheets("Sheet1").Shapes("Text Box 1").TextFrame.Characters.Text

VBA Noob

Re: Returning Multiple Entries With Index And Match

jesse,

MODERATOR NOTICE: This topic has also been posted on other sites and may already have an answer elsewhere. Please take this into consideration when answering this question

*

http://www.excelforum.com/showthread.php?t=644756

PM Dave Hawley if you agree to the forum rules

VBA Noob

Re: Vlookup

Quote

I know F6, is the value I need to lookup and in the other tab, it's in column 8,

If I read this correctly your trying to look up the value in F6 in the other tab in column 8. The lookup value needs to be in column 1 in the other tab not Column 8. Column 8 would be the value that is returned once a match is made in Column 1

HTH

VBA Noob

Re: Dave's 30,000 Post Prediction

dcraker,

Dave's post count is now 30007

I believe this was post 30000
http://www.ozgrid.com/forum/showthread.php?t=91529

Congrats Dave

VBA Noob

Re: Copy Values Only Of A Specified Range From One Workbook To Another

You don't have a rogue space in sheet tab

Try running the actions and see what code is output

VBA Noob

Re: Convert Date To Same Date But First Day Of Month

Maybe

Sub ConvertDate()
Dim i As Long, LastRow As Long
LastRow = Cells(Rows.Count, "A").End(xlUp).Row
For i = 1 To LastRow
    If IsDate(Cells(i, "A")) Then
        Cells(i, "A").Value = DateSerial(Year(Cells(i, "A")), Month(Cells(i, "A")), 1)
    End If
Next i
End Sub

VBA Noob

Re: Copy Values Only Of A Specified Range From One Workbook To Another

You should try searching links at the bottom first for an answer

Try something like

Workbooks("WorkbookA.xls").Sheets("Sheet1").Range("C479:Y529").Copy
Workbooks("WorkbookB.xls").Sheets("Sheet1").Range("A1").PasteSpecial Paste:=xlPasteValues

VBA Noob

Re: Convert Date To Same Date But First Day Of Month

Try

=DATE(YEAR(A1),MONTH(A1),1)

VBA Noob

ADDED BY ADMIN

Select the column and go Edit>Replace

US date format
Replace /*/
With /1/

NON US date format
Replace */
With 1/

Re: Send Each Row Every Day On A Specified Time

Did you change MyMacro to your macro name (Send_Files)

VBA Noob

Re: Run Indivudual Macros Depending On Validation List Selection

Change

Select Case Target.Range("A12").Value

to

Select Case Range("A12").Value

also add at the start

Application.EnableEvents = False

and turn on at the end

Quote

Application.EnableEvents = True

VBA Noob

Re: Dynamic Range

Maybe

Dim c As Range
For Each c In Range("R1:R" & Cells(Rows.Count, "A").End(xlUp).Row)
    If c.Value = True Then ' if true do nothing
        c.Value = ""
    ElseIf c.Value = False Then ' if false change to  Null
        c.Value = "Null"
    End If
Next

VBA Noob

ADDED BY ADMIN

Sub FillBlanks()
    Range("R1:R" & Cells(Rows.Count, "A").End(xlUp).Row).SpecialCells(xlCellTypeBlanks) = "NULL"
End Sub

Re: Macro To Average Specific Times During A Month

ferretydeath,

MODERATOR NOTICE: This topic has also been posted on other sites and may already have an answer elsewhere. Please take this into consideration when answering this question

*

PM Dave Hawley if you agree to the forum rules

VBA Noob