在ppt中调整图像大小,但不在第一张幻灯片上

时间:2020-10-11 15:35:09

标签: vba powerpoint

调整ppt中的图像大小,但我不希望将其应用到演示文稿的第一张幻灯片中。我应该做出什么更改?

enter image description here

2 个答案:

答案 0 :(得分:0)

我只熟悉VBA for Excel,因此我可能无法给您确切的代码。 您应该在第一个For语句之后插入“ if”,检查“ osld”的名称或索引-如果它是第一个幻灯片,则跳过代码大小调整部分。 (第一张幻灯片的索引可能是0?请在PP中检入)

例如

public void ConfigureServices(IServiceCollection services)
{
    services.AddTransient<AppDb>(_ => new AppDb(Configuration["ConnectionStrings:CoinConnection"])); // TODO: use CoinDb class and make AppDb class abstract
    services.AddTransient<UserDb>(_ => new UserDb(Configuration["ConnectionStrings:UserConnection"]));
    services.AddControllers();
}

答案 1 :(得分:0)

请,尝试以这种方式修改您的代码:

'YOUR CODE
'...
For Each osld In ActivePresentation.Slides
    If osld.SlideID <> ActivePresentation.Slides(1).SlideID Then
        For Each opic in osld.Shapes
            'Do here what your existing code does
        Next
    End If
next
'your existing code

除了SlideID之外,您还可以使用SlideIndexSlideNumber