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 (18681), Generación creativa (14327), Plantilla (12178), System prompt (1193), Flujo de trabajo (547), Persona (503), Agente (80)

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

4089 prompts

Layered Composition Prompt for Product Backdrops

Clean Composition Prompt for Product Backdrops

Personaje de figura de palo

Continuous line drawing of a cat using letters C…

Projection Mapping Minimalist Home Planets

Colorful Art Network Prompt

Color Split in Half Prompt Template

Ethereal Fog Blocks Abstract

Minimalist Snow Forest Establishment

Escena Retro de Estilo Ghibli

Personaliza el diseño de personajes con IA usand…

Minimalist Business Logo with Two Tigers

Minimalist Line Art Logo Prompt

Modern Geometry Logo Design $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…