Pages

Search

Microsoft Word - How to display variable text depending on the drop-down selection

Microsoft Word - How to display variable text depending on the drop-down selection


How to display variable text depending on the drop-down selection

Posted: 18 Apr 2014 02:20 PM PDT

Hello Experts,

I have been searching all over the internet for a solution to my problem, and I am hoping that someone can provide me with a simple solution.

 

In my document, I currently have a drop-down list with two different product names. I am looking for a way to separately display each product's description when the product name is selected from the drop-down list.

 

Can you please help me with this issue? It seems very simple, but I cannot find a solution that works.

Thanks in advance,

Tim

What do i do when in word I would hit the bacspace key and it would delete my entire line I was typing?

Posted: 18 Apr 2014 12:09 PM PDT

I was typing and I would hit backspace and it would delete the entire line I was typing. I was not hitting delete or any other key. Is there a way I can make it so this won't happen any more?

style inspector

Posted: 18 Apr 2014 11:30 AM PDT

I have this week migrated from Office 2003 to Office 365 (basically Office 2013) and finding my way around surprisingly well.  I have been able to find old and trusted commands albeit by first having to trawl through the menus.  In a Word document the Style box (AA) was conveniently displayed on the toolbar and as I moved through the document it was easy to see which paragraph styles I had applied.  However, this box is not displayed in Office 2013 - to view the paragraph styles I am using, I must go to Styles on the ribbon, click the small icon to open the Styles box and at the bottom I must click the second icon which reveals Style Inspector.  The Style Inspector box opens in the Task Pane and although it works well it is huge and annoyingly distracts me from my writing.  Not only that, I cannot pin it to the Task Pane - the box closes when I exit my document. So the exercise has to be repeated with every opening of a document.

Is there any way to have a smaller box and move it to the Styles to display permanently on the ribbon?

Please Microsoft, listen to your customers - 2003 had the perfect toolbars and menus - why change it?  Many like me, just want to keep our writing momentum which is sadly interrupted by hours spent trying to do the simple tasks we are used to.

Limit text field in fillable form

Posted: 18 Apr 2014 10:23 AM PDT

In my Word 2010 fillable form, when the user hits Tab, it extends the size of the text field.  How do I limit the size of each field?

Word 2010 pastes formatted text regardless of my settings.

Posted: 18 Apr 2014 10:09 AM PDT

I'm on Windows 7 64 bit.  In Word 2010, I have turned off every option related to pasting formatted text (see picture below).  Still, text always retains the source formatting (color, font, bold, etc.) when I copy and paste it.  This occurs for text within the same document, between different documents, and from other programs.  What is the problem?  How do I make it so that ONLY TEXT is pasted?  Thanks.

XLSX and DOCX wont default to Office 365 v15

Posted: 18 Apr 2014 09:53 AM PDT

I have both Office 2003 and Office 365  (v15) installed.

Despite whatever I do in the default programmes it still shows Office 2003 as the default for DOCX and XLSX .

I have even tried putting the full directory path into the box but it just duplicates the icons for 2003

I need to find a way to remove completely the default and then associate only the later version of Office

Ive had a look on the MS web help but just typically gave some garble about registry - without any practical step by step

BTW - I hate Office 365 and what MS have done to it and now I hate it even more. I only have it because my clients use later versions and I need to be familiar when I am at their sites.

Microsoftt word does not open

Posted: 18 Apr 2014 09:50 AM PDT

So Word was working fine a few weeks ago but for the past days, every time I try to press the  icon  to open up word it would load for a second then disappear like as if I didn't press on it, what should I do?

PLEASE HELP

Problem with Word proofing

Posted: 18 Apr 2014 08:10 AM PDT

I have Microsoft Office 2013 that I'm running on Windows 8.1.  Everything worked fine for about 3 months, and all of a sudden I encountered a number of problems.  First I regularly received an error message stating the following "this error usually occurs because of macro security settings. if you know that the macro comes from a source that you trust, you can change your macro security settings to allow you to enable the macro." 

Under advice from other threads on this site, I disabled the add-ons and this problem has disappeared.  BUT my other problem which arose at the same time has yet to be solved: the proofreading function is disabled.

At the top of the screen in Word, I get a message inviting me to download missing Proofreading tools.  I followed the link, but downloading the tool again does not help.  I also tried going to control panel and fixing (both online and offline) my version of Word, but in both cases I receive an error message and the fix cannot proceed.

Also, I am not sure if this is coincidental, but my problems emerged after running SofTest (an exam softword that functions entirely independently of Word).  The Help staff at ExamSoft (their parent company) have ensured me that the program does not affect Word in any way though..

Thanks for any help you have.

trying to number equations in mathtype 6

Posted: 18 Apr 2014 07:52 AM PDT

hi

im trying to number equation with mathtype 6 and including the paragraph number from level 1, i want the format look like:

1.

2.

         equation      (2.1)

         equation      (2.2)

i would be glad for help.

Very small file size (text only) .docx, .doc or .rtf becomes large PDF file - embedded fonts bug?

Posted: 18 Apr 2014 06:25 AM PDT

I have my CV (resume) and a covering letter. Neither has any pictures, just plain text. The file sizes in .docx, .doc or .rtf formats are 39, 76 and 171 KB respectively.

When I save as PDF, or export to PDF, the file size jumps to >400 KB, no matter which version I save/export from.

It's a fresh install of Office 2013 (365 University edition: I'm a researcher/teacher in a UK HEI). The file was imported from google drive where it was previously an openoffice formatted file.

The PDF appears to have quite a few fonts embedded - times new roman (which I was using accidentally for 2 white spaces, have now changed those), Symbol and Arial, which I'm not able to find at all in the document, and all the different styles of Callibri I'm using (bold, regular, italic) - each embedded twice with ansi and Identity-H encoding

I'm preparing for an interview and also writing another application right now, so I'm a bit up against it at the moment, and would greatly appreciate anyone's help on this!

Things I have tried:

  • Saving the document as .docx, reopening, export and save as PDF
  • Saving the document as .doc, reopening, export and save as PDF
  • Saving the document as .rtf, reopening, export and save as PDF
  • Ensured that track changes is off, and all meta information is not being saved (author, etc etc).
  • Tried all of the above with checked and unchecked 'embed fonts' in the options menu
  • Searching for the fonts I'm not using but that are listed in the properties of the PDF file when I look with Adobe Reader XI - I found two white spaces of Times New Roman which I changed to Callibri (which I'm using for the rest of the document). I couldn't find any instances of symbol or arial which were both listed in the PDF properties. Saving after this makes no difference to the pdf: all the fonts are still there, even though I'm not using them.
  • Select-all change font to Callibri (after this, no change when I PDF, and when I select all the font box is still blank as though there are more fonts and it didn't in fact change them).

Searching on this is compounded because most people seem to be asking for fonts to be embedded, not trying to stop fonts being embedded in this way! Callibri was what I chose when I originally created the document in OpenOffice some years ago. I've since bought myself Office 2013 and would really like not to be sending ~1MB files for just 7 pages of plain text - that's going to look really bad on a job application!!!!

Thanks in advance for your help!!

Office 2013 does not save in my 'My Documents' folder but keeps reverting to Libraries

Posted: 18 Apr 2014 06:00 AM PDT

I have set the Save path under Options to C:\Users\SAM\Documents (SAM being my computer name), this should also apply to OPEN (see highlighted area):

When I click SAVE AS it opens the Libraries, not my Documents location (Windows 7 Professional 64 bit). This happens in Word and Excel (haven't used PowerPoint):

I don't like the Libraries feature in Windows 7 and have never used it. How do I make Office recognize the Documents folder and not the Libraries folder?

Office word 2007 on windows 8.1

Posted: 18 Apr 2014 05:17 AM PDT

Can anyone help with a basic question? How can I delete a letter or document completely that I no longer require to clean up the file list on open? 

Re: Tables in Word 2010

Posted: 18 Apr 2014 03:20 AM PDT

Hi,

I cannot get a macro to load my userform.

My userform is called "AddNewGame".

I have the following macros to add a new game to the bottom of my table, but I am stuck with a few things, that I will highlight in [BOLDITALIC].

Please can you have a look at my macros, and if you can help me with them will be great, plus if you can give me help to make the macros work better, faster, and use Range instead of Select, as I make Macro Record to create my macros so it sets them in selection than range.

Here are my current macros:

Sub UserForm_Initialize()
    cmbFormat.List = Array("PC", _
        "PS1", "PS2", "PS3", "PS4", _
        "PSP", "PSVita", _
        "Wii", "WiiU", "DSXL", "3DSXL", _
        "Xbox", "Xbox 360", "Xbox One", _
        "PC Hardware", _
        "PS1 Hardware", "PS2 Hardware", "PS3 Hardware", "PS4 Hardware", "PSP Hardware", "PSVita Hardware", _
        "WiiU Hardware", "3DSXL Hardware", _
        "Xbox Hardware", "Xbox 360 Hardware", "Xbox One Hardware", _
        "Xbox Live", "PSN")
End Sub

-------------------------------------------------------------------------------------

Private Sub cmdCancel_Click()
    'When "Cancel Button" is Clicked On
    Unload Me
End Sub

-------------------------------------------------------------------------------------

Private Sub cmdOK_Click()
    'When "OK Button" is Clicked On
        'Add the New Game to the bottom of the List

        'Settings
            'Variables
            Dim txtTitle As String
            Dim cmbFormat As String
            Dim txtReleaseDate As String
            Dim txtASDA As String
            Dim txtTesco As String
            Dim txtGame As String
            Dim txtebay As String
            Dim FormatShading As String
            Dim NoDateSet As String
            Dim ReleaseDate1 As String
            Dim ReleaseDate2 As String

            'Defaults
            txtTitle = ""
            cmbFormat = ""
            txtReleaseDate = ""
            txtASDA = ""
            txtTesco = ""
            txtGame = ""
            txtebay = ""
            FormatShading = ""
            NoDateSet = ""
            ReleaseDate1 = ""
            ReleaseDate2 = ""

            'System
            Application.ScreenUpdating = False

    'Shading
    If Me.cmbFormat.Value = "PS3" Or Me.cmbFormat.Value = "PS3 Hardware" Then
        FormatShading = "-603923969"
    ElseIf Me.cmbFormat.Value = "PS4" Or Me.cmbFormat.Value = "PS4 Hardware" Then
        FormatShading = "-603930625"
    ElseIf Me.cmbFormat.Value = "PSP" Or Me.cmbFormat.Value = "PSP Hardware" Then
        FormatShading = "-603917569"
    ElseIf Me.cmbFormat.Value = "PSVita" Or Me.cmbFormat.Value = "PSVita Hardware" Then
        FormatShading = "-553582695"
    ElseIf Me.cmbFormat.Value = "Wii" Then
        FormatShading = "-570359809"
    ElseIf Me.cmbFormat.Value = "WiiU" Or Me.cmbFormat.Value = "WiiU Hardware" Then
        FormatShading = "15773696"
    ElseIf Me.cmbFormat.Value = "DSXL" Then
        FormatShading = "-570366209"
    ElseIf Me.cmbFormat.Value = "3DSXL" Or Me.cmbFormat.Value = "3DSXL Hardware" Then
        FormatShading = "-570366209"
    ElseIf Me.cmbFormat.Value = "Xbox One" Or Me.cmbFormat.Value = "Xbox One Hardware" Then
        FormatShading = "-704577639"
    Else
        FormatShading = wdColorAutomatic
    End If

    'UnHide Hidden Text
    With ActiveWindow.View
        .ShowAll = False
        .ShowHiddenText = True
    End With

    'Adding New Row at end of Table
    With Selection
        .HomeKey _
            Unit:=wdStory
        .MoveDown _
            Unit:=wdLine, _
            Count:=11
        .Tables(1).Select
        .End = .Tables(1).Range.End
        .InsertRowsBelow 1
    End With

    'Formatting New Row
    With Selection.Cells

        'ReMoving Shading
        With .Shading
            .Texture = wdTextureNone
            .ForegroundPatternColor = wdColorAutomatic
            .BackgroundPatternColor = FormatShading
        End With

        'Setting Top & Bottom Borders
        With .Borders(wdBorderTop)
            .LineStyle = wdLineStyleSingle
            .LineWidth = wdLineWidth050pt
            .Color = wdColorAutomatic
        End With
        With .Borders(wdBorderBottom)
            .LineStyle = wdLineStyleDouble
            .LineWidth = wdLineWidth050pt
            .Color = wdColorAutomatic
        End With
    End With

    'Place Cursor in 1st Empty Line
    With Selection
        .HomeKey _
            Unit:=wdLine
        .MoveRight _
            Unit:=wdCharacter, _
            Count:=1
    End With

    'Writing Game Details to the New Row
    With Selection
        .Text = Me.txtTitle.Value
        .MoveRight _
            Unit:=wdCell
        .Text = Me.cmbFormat.Value
        .MoveRight _
            Unit:=wdCell
        If Me.txtReleaseDate.Value = "" Or Me.txtReleaseDate = "dd/mm/yyyy" Then
            NoDateSet = 1
            ReleaseDate1 = "00000000"
            ReleaseDate2 = "1" & DaySuffix("1") & " January 2000"
        Else
            NoDateSet = 0
            ReleaseDate1 = Format(Me.txtReleaseDate.Value, "yyyymmdd")
            ReleaseDate2 = Format(Me.txtReleaseDate.Value, "d") & DaySuffix(Val(Me.txtReleaseDate.Value)) _
                & Format(Me.txtReleaseDate, " mmmm yyyy")
        End If
        .Text = ReleaseDate1 & Chr(11) & ReleaseDate2
        .HomeKey _
            Unit:=wdLine
        .EndKey _
            Unit:=wdLine, _
            Extend:=wdExtend
        .Font.Hidden = True
        .MoveDown _
            Unit:=wdLine, _
            Count:=1
        .HomeKey _
            Unit:=wdLine, _
            Extend:=wdExtend
        .Font.Hidden = False
        If NoDateSet = 1 _
        Or _
            Format(Me.txtReleaseDate.Value, "d") = 1 _
            Or Format(Me.txtReleaseDate.Value, "d") = 2 _
            Or Format(Me.txtReleaseDate.Value, "d") = 3 _
            Or Format(Me.txtReleaseDate.Value, "d") = 4 _
            Or Format(Me.txtReleaseDate.Value, "d") = 5 _
            Or Format(Me.txtReleaseDate.Value, "d") = 6 _
            Or Format(Me.txtReleaseDate.Value, "d") = 7 _
            Or Format(Me.txtReleaseDate.Value, "d") = 8 _
            Or Format(Me.txtReleaseDate.Value, "d") = 9 Then
            DayNumber = 1
        Else
            DayNumber = 2
        End If
        .MoveLeft _
            Unit:=wdCharacter, _
            Count:=1
        .MoveRight _
            Unit:=wdCharacter, _
            Count:=DayNumber
        .MoveRight _
            Unit:=wdCharacter, _
            Count:=2, _
            Extend:=wdExtend
        .Font.Superscript = True
        .MoveRight _
            Unit:=wdCell
        If Me.txtASDA = "" Then
            .Text = ""
        Else
            .Text = "£" & Me.txtASDA.Value
        End If
        .MoveRight _
            Unit:=wdCell
        If Me.txtTesco = "" Then
            .Text = ""
        Else
            .Text = "£" & Me.txtTesco.Value
        End If
        .MoveRight _
            Unit:=wdCell
        If Me.txtGame = "" Then
            .Text = ""
        Else
            .Text = "£" & Me.txtGame.Value
        End If
        .MoveRight _
            Unit:=wdCell
        If Me.txtebay = "" Then
            .Text = ""
        Else
            .Text = "£" & Me.txtebay.Value
        End If

        'Goto Game Title of the Game you've just added
        .MoveLeft _
            Unit:=wdCell, _
            Count:=6
        .HomeKey _
            Unit:=wdLine
    End With

    'Format Game Title
    'Need to look to see if '(' and ')' is in the Title, and if so,
    'the text inbetween the Brackets needs to be set to Font Size 8
    'and Italic.

    'Format Game Console
    'If any of the following are in the Format/Game Console, then the
    'following formatting needs to be done...
    'WiiU, WiiU Hardware, DSXL, DSXL Hardware, 3DSXL and 3DSXL Hardware
    'The 'U', and 'XL' needs to be in Italic and Superscript

    'Hide All Checking Symbols
    With ActiveWindow.View
        .ShowTabs = False
        .ShowSpaces = False
        .ShowParagraphs = False
        .ShowHyphens = False
        .ShowAll = False
        .ShowHiddenText = False
        .ShowObjectAnchors = False
    End With

    'Close UserForm
    Unload Me

    'System Settings
    Application.ScreenUpdating = True
End Sub

-------------------------------------------------------------------------------------

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    'Stop You from Clicking the "Red X" at Top-Right of UserForm to Close it
    If CloseMode = vbFormControlMenu Then
        Cancel = True
        MsgBox "              Please can you only" + Chr(13) _
            + "                  use the Buttons!" + Chr(13) _
            + Chr(13) _
            + "      Thank you for Understading.", , "Add New Game..."
    End If
End Sub

-------------------------------------------------------------------------------------

Function DaySuffix(ByVal DateNum As Integer) As String
    'Picking the DateSuffix
    Dim DS() As String
    DS = Split("st,nd,rd,th,th,th,th,th,th,th," & _
               "th,th,th,th,th,th,th,th,th,th," & _
               "st,nd,rd,th,th,th,th,th,th,th,st", ",")
   
    DaySuffix = DS(DateNum - 1)
End Function

Thank you in advance with any help you can give me,

Neil

Word 2013 Crashes

Posted: 18 Apr 2014 01:42 AM PDT

I am using Office 365 Home Premium running on Windows 7 64 bit. I have downloaded all the application. I am using Word 2013 and it crashes while I work. It crashes if I highlight a text, change text colour, insert table. The following is the error message. I have removed all third party add-ins. No luck. Can anyone help?

Description:


  A problem caused this program to stop interacting with Windows.



Problem signature:


  Problem Event Name: AppHangB1

  Application Name: WINWORD.EXE

  Application Version: 15.0.4601.1000

  Application Timestamp: 530c796c

  Hang Signature: 5953

  Hang Type: 0

  OS Version: 6.1.7601.2.1.0.256.48

  Locale ID: 1033

  Additional Hang Signature 1: 5953f3369ee1b6d89f4467bf1d3a06df

  Additional Hang Signature 2: 05dc

  Additional Hang Signature 3: 05dc22ac6bf35b9b13087deb3ba8ffca

  Additional Hang Signature 4: 5953

  Additional Hang Signature 5: 5953f3369ee1b6d89f4467bf1d3a06df

  Additional Hang Signature 6: 05dc

  Additional Hang Signature 7: 05dc22ac6bf35b9b13087deb3ba8ffca

How do I make a dsocument / form useable for MAC and PC. My drop down menus on the form don't work on a MAC. GRRR

Posted: 17 Apr 2014 10:11 PM PDT

I have a new problem. I need a doc / form to be useable in MS Word for Macs as well. When I sent it to a Mac user, I noticed that the drop down form field on the form wouldn't work. Is there a way to get that to functioning properly? Please help. I am really frustrated.  Thanks again!

How Do I Remove it??

Posted: 17 Apr 2014 10:09 PM PDT

Picture - http://prntscr.com/3b2bgx

What is it call ?

How do i hide it or remove it?