거리가 아닌 셀의 관점에서 그리드를 지정하는 방법은 무엇입니까?


0

간격 (PowerPoint 2016에서)이 아닌 표 선의 수를 기준으로 표를 지정할 수 있습니까? 프리젠 테이션을 디자인하는 데 도움이되는 2x3 격자를 원하지만 선 사이의 거리 측면에서 격자를 지정하는 방법 만 찾을 수 있습니다.

내가 찾은 설정 : enter image description here


2 * 3 테이블을 삽입하고 사용하는 것이 잘못된 이유는 무엇입니까? 슬라이드에 표 추가 - PowerPoint
DavidPostill

선택할 수 없게하는 방법이 있습니까? 그리고 마지막 프리젠 테이션에 나타나지 않는 것도 좋을 것입니다.
Toke Faurby

선택할 수없는 항목에 대해서는 모르겠지만 표 테두리는 삭제할 수 있습니다.
DavidPostill

1
슬라이드의 레이아웃 (보기 | 슬라이드 마스터, 테이블을 거기에 삽입)에 테이블을 놓으면 슬라이드에서 선택할 수 없습니다. 안내선을 켠 다음 기본 안내선을 Ctrl + 드래그하여 추가 안내선을 만들 수도 있습니다. PPT의 이전 버전에서는 최대 8 개의 수직 가이드와 8 개의 수평 가이드를 만들 수있었습니다. PPT 2010 이후로 그 한계가 해제되었습니다.
Steve Rindsberg

1
그건 그렇고, PPT 2013 (필자는 생각합니다.)과 2016 년에 VBA를 사용하여 가이드를 생성 / 이동 / 삭제할 수 있습니다. 가이드의 동일한 "눈금"을 반복해서 작성해야하는 경우 많은 시간을 절약하고 사물의 정확성을 높일 수 있습니다. 그게 중요한 일이라면 알려주고 예제 코드를 작성해 보겠습니다.
Steve Rindsberg

답변:


1

다음은 내가 유지 관리하는 PowerPoint FAQ 사이트의 코드 예제입니다.

PPT 2013 및 이후 버전의 가이드 작업 http://www.pptfaq.com/FAQ01214-Working-with-Guides-in-PPT-2013-and-later.htm

VBA 작업에 익숙하지 않은 경우 페이지 하단에 간단한 자습서 링크가 있습니다.

이렇게하면 원하는 위치에 horiz / vert 안내선을 추가 할 수 있습니다.

Sub AddGuides()

    Dim HGuides As String
    Dim VGuides As String
    Dim x As Long
    Dim aGuideArray() As String

    ' Edit these to indicate where you'd like to put guides:
    ' Values are in points, 72 points to the inch
    ' Separate each value from the next with a pipe | character

    ' Horizontal guide positions:
    HGuides = "72|144|256.5"
    ' Vertical guide positions:
    VGuides = "10|20|30|40|50|60|70|80|90|100"

    With ActivePresentation
        ' nb ppHorizonatalGuide = 1; ppVerticalGuide = 2
        ' nb to add guides to master rather than slides,
        '   use .SlideMaster.Guides.Add below
        '   in place of .Guides.Add

        ' First add the horizontal guides
        aGuideArray = Split(HGuides, "|")
        For x = LBound(aGuideArray) To UBound(aGuideArray)
            .Guides.Add ppHorizontalGuide, CSng(aGuideArray(x))
        Next

        ' and now the vertical guides
        aGuideArray = Split(VGuides, "|")
        For x = LBound(aGuideArray) To UBound(aGuideArray)
            .Guides.Add ppVerticalGuide, CSng(aGuideArray(x))
        Next

    End With

End Sub

나는 틀린 일을하고 있을지도 모르지만 (나는 그럴 가능성이 높다), 최선을 다해 가이드를 따라 갔고 오류가 발생했다. Run-time error '424' Object required. 라인을 가리키는 디버깅 Guides.Add ppHorizontalGuide, CSng(aGuideArray(x))
Toke Faurby

@ TokeFaurby 사과 ... 어떻게 든 복사 / 붙여 넣기 VBA에서 대답 여기에, 나는 점을 잃었습니다. 문제 선은 .Guides.Add ...로 시작해야합니다. 위의 답을 수정하여 수정합니다. 테스트 / 잡는 주셔서 감사합니다.
Steve Rindsberg

참고로 VGuidesHGuides 가이드 라인의 위치를 ​​픽셀로 지정 하시겠습니까?
Toke Faurby

1
@TokeFaurby 아니요. PowerPoint VBA의 대부분 측정과 마찬가지로 포인트 (72 인치)입니다. 픽셀은 많은 의미를 갖지 않습니다. 프레젠테이션을 고 / 저 비디오 해상도의 다른 PC로 옮기면 어떻게 될지 상상해보십시오. 또는 현재 PC의 줌 레벨을 변경했습니다. 모든 픽셀 측정 값이 창 밖으로 나옵니다. 음. 또는 Mac.
Steve Rindsberg
당사 사이트를 사용함과 동시에 당사의 쿠키 정책개인정보 보호정책을 읽고 이해하였음을 인정하는 것으로 간주합니다.
Licensed under cc by-sa 3.0 with attribution required.