Вы можете изменить связанные диаграммы для встроенных диаграмм в PowerPoint 2010? Или использовать относительные ссылки на файлы Excel?

Мне нужно, чтобы скопировать презентацию в нескольких странах, а затем отправить презентации коллегам и дать им возможность редактировать диаграммы.

чтобы сделать это, я создал файл Excel, который содержит данные для всех стран и таблицу данных, которая использует vlookups для извлечения данных для одной страны за раз. Затем у меня есть презентация PowerPoint, которая содержит около 30 диаграмм, связанных с таблицей данных. Для создания презентации страны я сохраняю копия презентации PowerPoint и файл Excel-по одной копии для каждой страны - а затем изменить страну на листе данных, так что обновления презентации (после обновления ссылки в файле с помощью макроса).

проблема у меня в том, что если я просто отправить файл PowerPoint для коллег они не могут редактировать диаграммы. Если я посылаю файл Excel, они до сих пор не можете редактировать диаграммы без изменения ссылок на место они сохранить файл в - что не выполнимый решение.

Я искал решение, но безуспешно.

Я был бы благодарен, если бы кто-нибудь мог предоставить способ реализовать одно из следующих решений с помощью макроса - или альтернативно предложить другое, о котором я не думал:

  • изменить все связанные диаграммы в презентации на встроенные диаграммы
  • изменить абсолютные ссылки на относительные ссылки в PowerPoint, так что пока
    Файл Excel сохраняется в том же папку с презентацией это
    можно редактировать диаграммы

спасибо!!

Simon

7
задан S Jacobs
04.12.2022 9:15 Количество просмотров материала 3144
Распечатать страницу

3 ответа

этот код может помочь. Но вам нужно иметь диаграмму вставляется в PowerPoint как связанный объект OLE.

Option Explicit

Sub HyperLinkSearchReplace()

    Dim oSl As Slide
    Dim oSh As Shape
    Dim sSearchFor As String
    Dim sReplaceWith As String

    sSearchFor = InputBox("What text should I search for?", "Search for ...")
    If sSearchFor = "" Then
        Exit Sub
    End If

    sReplaceWith = InputBox("What text should I replace it with" & vbCrLf _
        & sSearchFor & vbCrLf _
        & "with?", "Replace with ...")
    If sReplaceWith = "" Then
        Exit Sub
    End If

    On Error Resume Next

    For Each oSl In ActivePresentation.Slides

        For Each oSh In oSl.Shapes
            If oSh.Type = msoLinkedOLEObject _
            Or oSh.Type = msoMedia Then
               oSh.LinkFormat.SourceFullName = _
               Replace(oSh.LinkFormat.SourceFullName, _
               sSearchFor, sReplaceWith)
            End If
        Next

    Next    ' slide

End Sub
1
отвечен AVCossa 2022-12-05 17:03

Я думаю, что вам нужно скопировать и вставить диаграммы из Excel в PowerPoint определенным образом. 2-й вариант из шага 5 в руководстве от Microsoft говорит, чтобы вставить специальный, и он будет включать в себя доступ ко всей книге.

https://support.office.com/en-US/Article/Copy-Excel-data-or-charts-to-PowerPoint-f5f84f7b-b566-47fa-8c67-c95b8d14e7a3?ui=en-US&rs=en-US&ad=US#bmpastechartpowerpoint

0
отвечен Gilbert 2022-12-05 19:20

Если вы начинаете с файлами Excel и PPT файлов в том же каталоге, а затем связать их, то в зависимости от версии PPT на приемном конце, все может работать нормально, если PPT и XL файлы остаются в том же каталоге вместе, независимо от того, какой каталог, который является. Другие версии не будут работать таким образом. 2010, кажется.

кроме этого исключения, ссылки на XL и другое содержимое OLE должны иметь полный путь; относительное исправление не будет работать.

Это одна из тех неудачных ситуаций, когда и связывание, и встраивание имеют преимущества и недостатки, но вы не можете выбрать, какой из них вы хотите.

0
отвечен Steve Rindsberg 2022-12-05 21:37

Постоянная ссылка на данную страницу: [ Скопировать ссылку | Сгенерировать QR-код ]

Ваш ответ

Опубликуйте как Гость или авторизуйтесь

Имя

Похожие вопросы про тегам:

charts
macros
microsoft-excel-2010
microsoft-powerpoint
microsoft-powerpoint-2010
Вверх