Search results

@Marc L I was in the hospital for 11 months, a lot of Excel Logic was lost there, hope it doesn't happens to you.

Thank you both for the assistance.

=IF(WEEKDAY(TODAY(),2)=6,TODAY()-1) IF(WEEKDAY(TODAY(),2)=7,TODAY()-2) I want to combine these 2 so that if it is weekend cell always returns last friday

Hi Bob, Glad to help. Let me know if your problem is solved. What I meant by: it is the same in Excel, you just have to enter a letter just like in Access

Hi Bob It is the same in Excel. Use the accelerator property see example. (shortcut for OptionButton2) The shortcut is Alt + q

Hi, Thank you.

Hi, I have this code to empty junkfolders in outlook. Unfortunately, it only works for the default account, what can I do to let it work for both accounts? Thanks. Sub EmptyDeletedItems() Dim olApp As Outlook.Application Dim olNS As Outlook.NameSpace Dim objExpl As Outlook.Explorer Dim mboxCount...

Glad to help.:)

Like this?

This PDF in Excel. Hope it helps.

Glad to help.:)

Hi, Like this? Sub CleanCells() For i = 3 To 17 Sheets("Plan1").ListObjects("Tabela1").ListColumns(i).DataBodyRange.ClearContents Next i For i = 24 To 28 Sheets("Plan1").ListObjects("Tabela1").ListColumns(i).DataBodyRange.ClearContents Next i End Sub

Do you mean this? Sub CleanCells() With Sheets("Plan1").ListObjects("Tabela1") If Not .DataBodyRange Is Nothing Then .DataBodyRange.ClearContents End With End Sub

Glad to help.:)

Hi, Set cell format to standard or number.

Code goes in ThisWorkbook Event Private Sub Workbook_Open() With Sheets("Calendar") .Select .Range("E6").Value = Month(Date) End With End Sub

I guess you mean something like this? Make your choises in list 1 and 2.

This remark pisses me off, maybe in Paris it is basic, for most users this is not basic. Respect please!

Glad to help.:)

Sub Task_Cnt() Dim ANSYS As Integer, MATLAB As Integer, MPASM As Integer For Each c In Sheets("Sheet1").UsedRange.Columns(1).Cells If c.Value = "Ansys" Then ANSYS = ANSYS + 1 If c.Value = "Matlab" Then MATLAB = MATLAB + 1 If c.Value = "Mpasm" Then MPASM = MPASM + 1 Next c MsgBox...

I was working on your file file, but my wife says I have to do the dishes now and then;), to finish it it takes a bit of time. I use short names T_00,T_01 etc.. so it is easy to use a loop (For 0 to 10 for example) You are right, the short names are almost the same as the columns, but I start...

Everybody has to learn,you cant't run before walking.

I been looking in your code,the formulas are added but deleted again, I can't find why. There is such a bunch of crap in your codes,sorry. A starter up to column 65.

Try the button mail just for fun.

Glad to help:)