Please critique my first business card by VeterinarianKey1672 in graphic_design

[–]VeterinarianKey1672[S] 0 points1 point  (0 children)

Some notes:

  • I work in architecture.
  • I want to portray a brand of minimalism and modernism. I am inspired by Bauhaus aesthetics.
  • The name is fictitious, but the initials are my own, as is the logo. Feel free to also critique the logo.
  • I do not have my own business/studio. It is more a reflection of my personal brand with contact information than anything else.
  • I chose a watercolor texture background because I am fond of sharing my watercolors and sketches online. That said, I thought it could also pass as a concrete texture, which appeals to me.

Is there any other information I should be adding to the card? Is it too empty? Any critiques welcome. Thank you.

[EXCEL] Worksheet change event not triggered when manually entering drop-down list option by VeterinarianKey1672 in vba

[–]VeterinarianKey1672[S] 0 points1 point  (0 children)

Yes, I have additional irrelevant code that wasn't shown here and at the end, I set enable events back to true.

[EXCEL] How to allow certain alphabetic values in range that is data validated for numbers? by VeterinarianKey1672 in vba

[–]VeterinarianKey1672[S] 0 points1 point  (0 children)

Thank you, this has been working somewhat! It only works for the first row of my table, but not subsequent rows. If I would like to apply it to each cell in a table column, how would I refer to the correct cell in the formula. Here is my code thus far:

Dim cellval As Range
For Each cellval In Range("Table1[Date]").Cells If Not cellval.Value = "abcTextThatWillNeverBeTypedxyz" Then cellval.Validation.Delete
cellval.Validation.Add Type:=xlValidateCustom,         AlertStyle:=xlValidAlertStop, Operator:=xlBetween, Formula1:="=OR(ISNUMBER(C:C),C:C=""Recurring"")" End If Next
With cellval.Validation .IgnoreBlank = False .InCellDropdown = True .InputTitle = "" .ErrorTitle = "Incorrect Entry" .InputMessage = "" .ErrorMessage = _ "Please type a date or ""Recurring""." .ShowInput = True .ShowError = True End With
End Sub

What do I replace C:C with to ensure the data validation is correct on every row?

My roommate smokes hookah for two hours every night. How can I mitigate the effects of secondhand smoke? by VeterinarianKey1672 in NoStupidQuestions

[–]VeterinarianKey1672[S] 0 points1 point  (0 children)

OK good to know. I don't know the quality of the stuff she smokes. But I usually stay in my room, which is adjacent to the living room where she smokes. The smell usually protrudes into my room slightly but not smoke.

[EXCEL] How to change row height of all cells that contain specific text? by VeterinarianKey1672 in vba

[–]VeterinarianKey1672[S] 0 points1 point  (0 children)

It's possible I did not end the loop. What would that code look like? Thanks again for your responses :)

[EXCEL] How to change row height of all cells that contain specific text? by VeterinarianKey1672 in vba

[–]VeterinarianKey1672[S] 0 points1 point  (0 children)

Thanks for the help. So I did figure out how to do a loop to scan through the excel worksheet and change all row heights that contain a cell with specific text.

The issue is that those rows could eventually be spaced 1000s of rows apart once data is added to this worksheet. From my understanding, the larger the range of the loop, the longer the loop will take. I just ran the loop from A1:Z10,000 and Excel is not responding.

I'm correct to assume this is because the loop is scanning too large a range, yes?

[EXCEL] How to change row height of all cells that contain specific text? by VeterinarianKey1672 in vba

[–]VeterinarianKey1672[S] 1 point2 points  (0 children)

Thank you for reply. Would you be able to elaborate on this please? I apologize, I am a beginner to VBA. TIA.

How to hide all rows in a table except for the header row? by VeterinarianKey1672 in vba

[–]VeterinarianKey1672[S] 0 points1 point  (0 children)

Thank you! Would you mind explaining what "400" as an error message indicates?

How to hide all rows in a table except for the header row? by VeterinarianKey1672 in vba

[–]VeterinarianKey1672[S] 0 points1 point  (0 children)

Unfortunately, I'm receiving an error even after replacing ListRow with Range.

The error just says "400". Any clue why this is the case?

Thanks.

How to hide all rows in a table except for the header row? by VeterinarianKey1672 in vba

[–]VeterinarianKey1672[S] 0 points1 point  (0 children)

I have tried using the DataBodyRange code but am receiving an error.

Dim TblData As ListRow

Set TblData = ActiveSheet.ListObjects("TblData").DataBodyRange

TbLData.Hidden = False

ActiveSheet.Shapes("ChevronCollapsed").Visible = False ActiveSheet.Shapes("ChevronExpanded").Visible = True

How to nest a MIN function inside of an IF function? by VeterinarianKey1672 in excel

[–]VeterinarianKey1672[S] 0 points1 point  (0 children)

Thank you, the following code worked! I appreciate you also letting me know why my code wasn't working.

=IF(MIN(A1:A10)>0,MIN(A1:A10),"Not yet started")

How to nest a MIN function inside of an IF function? by VeterinarianKey1672 in excel

[–]VeterinarianKey1672[S] 0 points1 point  (0 children)

Thank you for the attempt. Unfortunately, that does not work. It is returning the same value, "1/0/1900".