Buscar

Filtros (2)▾

Vista

Iconos grandes, Lista

Categoría

Todos, Creatividad, Marketing, Negocios, Productividad, Programación, Educación, Personal, Investigación, Otros

Fuente

Todos, Twitter / X, Reddit, Instagram, MeiGen, prompts.chat, Wikiprompt

Subido

Cualquiera, Últimos 7 días, Últimos 30 días, Últimos 90 días, Último año

Orden

Relevancia, Más recientes, Mejor valorados, Más vistos

Tipo

Todos, Imágenes, Videos, Texto

Longitud del prompt

Todos, Corto, Medio, Largo

Tipo de prompt

Todos, One-shot (22547), Plantilla (14728), Generación creativa (14582), System prompt (1271), Flujo de trabajo (621), Persona (533), Agente (88)

Calidad

Todos, ★ Solo destacados

Valoración

Cualquiera, 2+ ★, 3+ ★, 4+ ★, 5+ ★

Acerca de Wikiprompt, Blog, Estadísticas, Creadores, API, MCP Server, Claude Skill, Términos de Uso, Política de Privacidad

minimalist 2★+Limpiar todo

4562 prompts

Proyección Mapping Planetas Minimalistas para el…

Prompt de Red de Arte Colorido

Plantilla de indicación de división de color por…

goesques de niebla etérea abstractos

Establecimiento Minimalista de Bosque Nevado

Escena Retro de Estilo Ghibli

Personaliza el diseño de personajes con IA usand…

Logotipo Empresarial Minimalista con Dos Tigres

Indicación de logotipo de arte lineal minimalist…

Diseño de logotipo de geometría moderna $Here is the VBA code for PowerPoint: ```vba Sub GenerateVBAForPowerPoint() ' This macro demonstrates how to create a new presentation and add a slide with a title and subtitle Dim pptApp As Object Dim pptPres As Object Dim pptSlide As Object ' Create a new instance of PowerPoint Set pptApp = CreateObject("PowerPoint.Application") pptApp.Visible = True ' Create a new presentation Set pptPres = pptApp.Presentations.Add ' Add a title slide (layout 1 is typically Title Slide) Set pptSlide = pptPres.Slides.Add(1, 1) ' Set the title text pptSlide.Shapes(1).TextFrame.TextRange.Text = "Hello, PowerPoint!" ' Set the subtitle text pptSlide.Shapes(2).TextFrame.TextRange.Text = "Generated with VBA" ' Optional: Save the presentation ' pptPres.SaveAs "C:\YourPath\YourPresentation.pptx" ' Clean up Set pptSlide = Nothing Set pptPres = Nothing Set pptApp = Nothing MsgBox "Presentation created successfully!" End Sub ```$ Here is the VBA code for PowerPoint: ```vba Sub…